Select Code to Download

#earlier in SQL
CREATE TABLE tbl ( id serial, col2 text, col3 text );
NOTICE:  CREATE TABLE will create implicit sequence 'tbl_id_seq' for S
+ERIAL column 'tbl.id'

my $myid;
my $dbh=DBI->connect("DBI:Pg(AutoCommit=>0,RaiseError=>1):dbname=foo")
+;
...
}

# $myid has your id in it here.