blib/lib/Devel/StackTrace/WithLexicals.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 13 | 20 | 65.0 |
line | true | false | branch |
---|---|---|---|
27 | 16 | 0 | unless $sub eq '(eval)' |
30 | 0 | 23 | $$self{'no_args'} ? : |
44 | 0 | 15 | $$self{'no_args'} ? : |
52 | 14 | 1 | if ($sub ne '(eval)') |
56 | 0 | 15 | if $filter and not &$filter($raw) |
58 | 4 | 11 | unless ($$self{'unsafe_ref_capture'}) |
59 | 0 | 11 | ref $_ ? : |
62 | 4 | 2 | if ref $_ eq 'REF' |
80 | 0 | 15 | if $filter and not &$filter($r) |
93 | 0 | 15 | if scalar @$c == 6 |