use DBI;
$dbh = DBI->connect('dbi:ODBC:'.$dbsrvr, $dbuser, $dbpass);