blib/lib/Error/Pure/JSON.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 1 | 3 | 33.3 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
33 | 0 | 5 | 0 | $$stack_ar[-1]{'class'} eq 'main' and none sub { $_ =~ /^eval '/ms unless $_ eq $EVAL; } , map({$$_{'sub'};} @{$stack_ar;}) |