blib/lib/Error/Pure/JSON.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 4 | 6 | 66.6 |
line | true | false | branch |
---|---|---|---|
33 | 0 | 5 | if ($$stack_ar[-1]{'class'} eq 'main' and none sub { $_ =~ /^eval '/ms unless $_ eq $EVAL; } , map({$$_{'sub'};} @{$stack_ar;})) { } |
34 | 5 | 5 | unless $_ eq $EVAL |
42 | 0 | 5 | if (not defined $e) { } |