| blib/arch/Time/XS.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 19 | 26 | 73.0 |
| line | true | false | branch |
|---|---|---|---|
| 14 | 0 | 26 | unless tzsysdir() |
| 18 | 0 | 0 | if (tzsysdir()) { } |
| 31 | 0 | 3 | unless my $zones_dir = tzdir() |
| 37 | 86 | 3 | $subdir ? : |
| 39 | 0 | 89 | unless opendir my $dh, $dir |
| 42 | 178 | 2526 | if $first eq '.' or $first eq '_' |
| 44 | 86 | 2440 | if (-d $path) { } |
| 2440 | 0 | elsif (-f $path) { } | |
| 45 | 50 | 36 | $subdir ? : |
| 47 | 0 | 2440 | unless open my $fh, '<', $path |
| 49 | 8 | 2432 | unless $content =~ /^TZif/u |
| 50 | 6 | 2426 | if $entry =~ /(posixrules|Factory)/u |
| 51 | 2336 | 90 | $subdir ? : |