blib/lib/Spreadsheet/Read/Ingester.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 14 | 18 | 77.7 |
line | true | false | branch |
---|---|---|---|
31 | 1 | 1 | unless ($data) |
34 | 0 | 1 | if $data->[0]{'error'} |
45 | 1 | 2 | if (not defined $age) { } |
1 | 1 | elsif ($age eq '0') { } | |
1 | 0 | elsif (not $age =~ /^\d+$/) { } | |
56 | 0 | 2 | unless opendir DIR, $configdir |
61 | 4 | 4 | if -d $file |
62 | 2 | 2 | if (-M $file >= $age) |
63 | 0 | 2 | unless unlink $file |