<%shared>
        ## Create database handle
        $dbh = DBI->connect(
                q{dbi:Pg:dbname=contacts},
                q{ecarroll},
                "",
                {AutoCommit=>0, RaiseError=>1, PrintError=>1}
        ) || die "Could not Connect to  DB".$dbi::errstr;

        $dbh->commit;
</%shared>

<%cleanup>
        undef $S;
        $dbh->commit;
</%cleanup>