my $dbh = DBI->connect('DBI:MSSQL:database', {AutoCommit => 0}, )
   or die "Couldn't connect to database: " . DBI->errstr;