| blib/lib/Hook/LexWrap.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 16 | 17 | 94.1 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 49 | 1 | 1 | 9 | ref $return eq 'ARRAY' and $return == $prereturn |
| 2 | 2 | 7 | ref $return eq 'ARRAY' and $return == $prereturn and not @$return |
| line | l | !l | condition |
|---|---|---|---|
| 11 | 74 | 12 | $_[0] || 0 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 18 | 58 | 258 | 74 | $name_cache or $height-- != 0 |
| 28 | 3 | 1 | 24 | ref $typeglob || $typeglob =~ /::/ |
| 34 | 27 | 1 | 0 | ref $typeglob eq 'CODE' && $typeglob || *$typeglob{'CODE'} || croak(q[Can't wrap non-existent subroutine ], $typeglob) |