local $@;
my $book;
my $ok = eval {
  $book = Spreadsheet::Read->new($file);
  1;
};