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