my $DSN = "DBI:ODBC:MSSQLServer"; my $UID = "connect($DSN,$UID,$PWD) or die "$DBI::errstr\n";