Branch Coverage

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) { }