Branch Coverage

blib/lib/Error/Pure/NoDie.pm
Criterion Covered Total %
branch 4 4 100.0


line true false branch
36 2 5 if ($stack_ar->[-1]{'class'} eq 'main' and &none(sub { $_ =~ /^eval '/ms unless $_ eq $EVAL; } , map({$_->{'sub'};} @{$stack_ar;}))) { }
37 8 5 unless $_ eq $EVAL