>>In article <199806210737.AAA20815@ralf.serv.net>, Ken McGlothlen <mcglk@serv.net> writes:
> [This is the second time I've asked this on this list. Is anyone
> else getting my messages? I would *really* like to get an answer
> here.]
> Here's the program, in Perl; I've pared it down to the bare minimum:
> #!/usr/local/bin/perl
> use DBI;
> sub tbl_easy_init {
> local( $dbh ) = shift;
> local( $sth ) = $dbh->prepare( "create table tbl_easy (id int4)" );
> $sth->execute();
=====> $dbh->commit;
> }
> $dbh = DBI->connect( "dbi:Pg:dbname=booga", "", "",
> { "PrintError" => 0, "AutoCommit" => 0 } );
> $rv = &tbl_easy_init( $dbh );
> This program fails. I've tried it with all global variables, tried
> a number of different CREATE TABLE statements, and so on, and $rv
> always winds up being equal to -1. Yet, typing in the CREATE TABLE
> statement in psql works.
--
... _._. ._ ._. . _._. ._. ___ .__ ._. . .__. ._ .. ._.
Felix Finch: scarecrow repairman & rocket surgeon / felix@crowfix.com
PGP = 91 B3 94 7C E9 E8 76 2D E1 63 51 AA A0 48 89 2F ITAR license #4933
I've found a solution to Fermat's Last Theorem but I see I've run out of room o