use DBI;
my $dbh = DBI->connect('DBI:ODBC:driver=SQL Server;database=mydb;server=myserver;app=myapp',$username,$password);