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