blib/lib/Spreadsheet/Read/Ingester.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 15 | 20 | 75.0 |
line | true | false | branch |
---|---|---|---|
28 | 2 | 0 | if ($suffix) |
40 | 1 | 1 | unless ($data) |
43 | 0 | 1 | if $data->[0]{'error'} |
54 | 1 | 2 | if (not defined $age) { } |
1 | 1 | elsif ($age eq '0') { } | |
1 | 0 | elsif (not $age =~ /^\d+$/) { } | |
65 | 0 | 2 | unless opendir DIR, $configdir |
70 | 6 | 4 | if -d $file |
71 | 2 | 2 | if (-M $file >= $age) |
72 | 0 | 2 | unless unlink $file |