This one works:

my $connect_string = "dbi:ODBC:DRIVER={SQL Server};SERVER={$server};UI
+D=$username;PWD=$password;DATABASE=$db;";
    $dbh = DBI->connect($connect_string);
[download]

Thanks to all.