From: | Andreas Seltenreich <seltenreich(at)gmx(dot)de> |
---|---|
To: | Andreas Kretschmer <akretschmer(at)despammed(dot)com> |
Cc: | pgsql-de-allgemein(at)postgresql(dot)org |
Subject: | Re: [despammed] Re: Performance von LIMIT und OFFSET |
Date: | 2005-04-29 16:06:34 |
Message-ID: | 877jil5zzp.fsf@gate450.dyndns.org |
Views: | Raw Message | Whole Thread | Download mbox | Resend email |
Thread: | |
Lists: | pgsql-de-allgemein |
Andreas Kretschmer schrob:
> Sicher kann ich das auch via der tcl-Schnittstelle nutzen, oder?
Schaut vielversprechend aus:
--8<---------------cut here---------------start------------->8---
andreas(at)athlon:~/src/tcl$ cat pgcursors.tcl
#!/usr/bin/tclsh
load /usr/lib/postgresql/libpgtcl.so
set dbh [pg_connect scratch]
foreach command {
{begin}
{create temporary table words (w text)}
{copy words from '/usr/share/dict/words'}
{declare foo cursor for select w from words}
} {
set result [pg_exec $dbh $command]
puts [pg_result $result -status]
pg_result $result -clear
}
set result [pg_exec $dbh {move 20000 in foo}]
puts [pg_result $result -status]
pg_result $result -clear
set result [pg_exec $dbh {fetch 1 from foo}]
puts [pg_result $result -status]
puts [pg_result $result -getTuple 0]
pg_result $result -clear
andreas(at)athlon:~/src/tcl$ ./pgcursors.tcl
PGRES_COMMAND_OK
PGRES_COMMAND_OK
PGRES_COMMAND_OK
PGRES_COMMAND_OK
PGRES_COMMAND_OK
PGRES_TUPLES_OK
Drehmoment
--8<---------------cut here---------------end--------------->8---
Gruß
Andreas
From | Date | Subject | |
---|---|---|---|
Next Message | Alvar Freude | 2005-04-29 20:06:02 | Re: Performance von LIMIT und OFFSET |
Previous Message | Andreas Kretschmer | 2005-04-29 15:15:51 | Re: [despammed] Re: Performance von LIMIT und OFFSET |