blob: e79445b0ca6659d6fce5364a41fa41817927c11d (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
#!/usr/bin/env perl
use strict;
use warnings;
use Test::More;
use Spreadsheet::ParseXLSX;
my $wb;
eval {
$wb = Spreadsheet::ParseXLSX->new->parse('t/data/target-abspath.xlsx');
};
if ($@) {
diag $@;
}
ok((not $@), "parsing target-abspath.xlsx ok");
done_testing;
|