Select Code to Download

my $dbcon = DBI->connect ( 
   qq{dbi:ODBC:driver={SQL Server};Server=127.0.0.1;database=master;},
...
$sth->execute();

print $DBI::errstr;