use DBI; my $dbh = DBI->connect ("dbi:ODBC:freetds");