use DBI;

my $dbh = DBI->connect

('dbi:Pg:hostname=192.168.1.75;dbname=finance;host=db.example.com','postgres','uvm',

{AutoCommit=>1,RaiseError=>1,PrintError=>0});
print "2+2=",$dbh->selectrow_array("SELECT 2+2"),"\n";

exit(0);