..

my $dbh = DBI->connect("dbi:Pg:dbname=Raum;host=127.0.0.1;Port=5342", "perl_db", "****", { RaiseError => 0, AutoCommit => 0 }) or croak $DBI::errstr;     
..