You can use DBD::ADO or DBD::ODBC to connect to SQL Server 2008 databases, if you use DBD::ODBC you may google for "DSN less connection", this is what you need. Using BDB::ADO the connection should look like:

    
    my $userid   = q{};
    my $password = q{};    
    my $strCnn = "Provider=SQLOLEDB; Data Source=$Servername; Initial 
+Catalog=$Tablename; Integrated Security=SSPI;";
    $dbh = DBI->connect( "dbi:ADO:$strCnn", $userid, $password, { Rais
+eError => 1, AutoCommit => 0 } ) or 
        croak "Cannot connect: $DBI::errstr";
[download]

but beware, there is a problem: SQLOLEDB may truncate inserted strings. Look at the docs of DBD::ADO.

If you use DBD::ODBC the connection should look like:

    my $data_source = qq/dbi:ODBC:driver={SQL Server};Server=$Serverna
+me;database=$DataBaseName;Regional=No;/;
    my $user = q//;
    my $password = q//;
    $dbh = DBI->connect($data_source, $user, $password)
              or die "Can't connect to $data_source: $DBI::errstr";
[download]

Hope that helps.