4 use base 'DBIx::Class';
6 my $db = $ENV{DBD_PG_DBNAME} || 'template1';
7 my $user = $ENV{DBD_PG_USER} || 'postgres';
8 my $pass = $ENV{DBD_PG_PASSWD} || '';
10 __PACKAGE__->connection("dbi:Pg:dbname=$db", $user, $pass,
15 my ($table, $sequence) = ($class->table, $class->sequence || "");
16 my $schema = $class->schema;
17 $class->db_Main->do("CREATE TEMPORARY SEQUENCE $sequence") if $sequence;
18 $class->db_Main->do("CREATE TEMPORARY TABLE $table ( $schema )");