my $parser = Spreadsheet::ParseExcel->new();
my $book = $parser->Parse($filename);
undef $parser;