$dbh = DBI->connect("dbi:Pg:dbname=rodneyd",q/postgres/,"",{AutoCommit =>0, RaiseError=>1, PrintError=>0}) || die "Could not Connec
t to  DB".$dbi::errstr;