or download this
use DBI;
my $connect_string = "driver={SQL Server};app=ProvolonePiccante;Server
+=100.100.100.100;Database=TEST;UID=usrTEST;PWD=pwdTEST";
...
my $str="INSERT INTO usrTEST.test_table(\'id_oggi\') VALUES (\'111111\
+')";
$sth = $dbh->prepare($str);
$sth->execute ;