| blib/lib/lib/archive.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 18 | 28 | 64.2 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 138 | 0 | 1 | 7 | defined $Devel::Cover::VERSION && !$ENV{'PERL_LIB_ARCHIVE_TESTING'} |
| 156 | 0 | 12 | 0 | ++$mod and shift @parts |
| 157 | 0 | 25 | 0 | ++$lib and shift @parts |
| 170 | 95 | 3 | 2 | $ignore and &$ignore($rel) |
| 174 | 0 | 8 | 5 | $under_debugger and not $under_cover |
| line | l | !l | condition |
|---|---|---|---|
| 163 | 11 | 10 | $ver[-1] // "" |
| 6 | 21 | $cache{$rel} //= {"path", "$path/$full", "content", $tmp{$rel}{$full}, "arcver", $ver[-1] // ""} |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 136 | 1 | 7 | 0 | $ENV{'PERL_LIB_ARCHIVE_EXTRACT'} // "$home/.lib_archive_extract" |
| 174 | 3 | 5 | 8 | $ENV{'PERL_LIB_ARCHIVE_EXTRACT'} or $under_debugger and not $under_cover |
| 175 | 0 | 0 | 0 | $INC{$rel} //= $rec->{'path'} |