my $myDSN = 'data_source_name'; my $dbh = DBI->connect("DBI:ODBC:$myDSN", 'user', 'password', { RaiseError => 1}) or die DBI->errstr;