| 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: | Whole Thread | Raw Message | 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 |