use strict;
use Win32::ODBC;
my $data = new Win32::ODBC("DSN=SQLServer") or die "Could not open because of [$!]";

my $SQL = "SELECT itemNbr, Store_Num FROM sales";

my $connection;

if($connection->Sql($SQL))