blib/lib/Sub/WrapPackages.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 21 | 22 | 95.4 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
216 | 1 | 131 | 240 | ref $v ne 'SCALAR' and defined &{$v;} |
273 | 4 | 0 | 32 | exists $params{'packages'} and ref($params{'packages'}) =~ /^ARRAY/ |
341 | 151 | 27 | 1 | exists $params{'except'} and $sub =~ /$params{'except'}/ |
line | l | !l | condition |
---|---|---|---|
335 | 32 | 3 | $params{'pre'} ||= sub { } |
336 | 31 | 4 | $params{'post'} ||= sub { } |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
233 | 2 | 9 | 148 | grep {$module =~ /^$_(::|$)/;} @{$wildcard_packages;} or grep {$module eq $_;} @{$nonwildcard_packages;} |
334 | 32 | 3 | 1 | $params{'pre'} or $params{'post'} |
341 | 1 | 8 | 170 | exists $params{'except'} and $sub =~ /$params{'except'}/ or exists $ORIGINAL_SUBS{$sub} |