blib/lib/Devel/Deprecations/Environmental.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 16 | 16 | 100.0 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
191 | 18 | 36 | 18 | exists $_froms{$pair->[0]} and exists $_froms{$pair->[1]} |
54 | 15 | 3 | exists $_froms{$pair->[0]} and exists $_froms{$pair->[1]} and not $_froms{$pair->[0]} < $_froms{$pair->[1]} | |
202 | 11 | 3 | 2 | $_froms{'fatal_from'} and $_froms{'fatal_from'} < $now |
11 | 1 | 2 | $_froms{'unsupported_from'} and $_froms{'unsupported_from'} < $now |
line | l | !l | condition |
---|---|---|---|
159 | 10 | 16 | $args->{'warn_from'} ||= "1970-01-01" |
219 | 1 | 9 | (sort {$a <=> $b;} map({$_froms{$_};} grep({$_froms{$_};} 'unsupported_from', 'fatal_from')))[0] || undef |