my $dbh = DBI->connect("dbi:ODBC:driver={PostgreSQL Unicode};Server=127.0.0.1;Port=5432;Database=database;Uid=username;Pwd=password;", username, password, {PrintError => 1, RaiseError => 1}) || die "Error $DBI::err [$DBI::errstr]";