On a Win32 system, I've had success connecting to an MS SQL 2000 server with DBD::ODBC.

use strict;
use DBI;

my $server_name   = 'FOO';
my $database_name = 'bar';
my $database_user = 'baz';
my $database_pass = 'xyzzy';

my $DSN = "driver={SQL Server};Server=$server_name;database=$database_
+name;uid=$database_user;pwd=$database_pass;"; 
my $dbh = DBI->connect("dbi:ODBC:$DSN") or die $DBI::errstr;
my $sth = $dbh->prepare('EXEC my_stored_procedure');
$sth->execute or die $DBI::errstr;

# ...

$dbh->disconnect;
[download]

HTH

--
Rock is dead. Long live paper and scissors!