my $dbconnection = DBI->connect("dbi:Pg:dbname=$database", $dbuser, $usrpsswd);