# Set the DSN for ODBC connection

my $DSN		= "driver=Microsoft Excel Driver (*.xls);dbq=$SpreadSheet";

# Connect to the Spread Sheet

my $ExcelHandle = DBI	->connect("dbi:ODBC:$DSN", '','')
	or die "$DBI::errstr\n";