Branch Coverage

blib/lib/Exception/Class/TryCatch.pm
Criterion Covered Total %
branch 21 22 95.4


line true false branch
23 19 11 @error_stack ? :
24 15 15 if (UNIVERSAL::isa($err, 'Exception::Class::Base')) { }
12 3 elsif ($err eq '') { }
34 27 3 unless (ref $_[0] eq 'ARRAY')
38 18 12 if ($e)
39 2 16 if (defined $_[0] and ref $_[0] eq 'ARRAY')
40 2 0 unless grep {$e->isa($_);} @{$_[0];}
43 1 1 $e ? :
2 26 wantarray ? :
55 1 1 ref $v eq 'ARRAY' ? :
2 17 if wantarray