Branch Coverage

blib/lib/Test/Trap/Builder.pm
Criterion Covered Total %
branch 68 68 100.0


line true false branch
36 6193 38 unless $package
37 321 5910 unless $self->{' id '}
51 5 5 unless my $m = $self->Prop->{'on_test_failure'}
97 2 298 unless eval { do { $trap->Next; 1 } }
101 3 847 unless eval { do { &$_(); 1 } }
104 221 90 unless $trap->Prop->{'exception'}
16 295 if @{[] unless $trap->Prop->{'exception'};}
107 105 190 $wantarray ? :
138 5 81 _need_index() ? :
150 5 81 if $accessor->{'is_array'}
173 2 128 unless $ok = $test->{'code'}->(@targs)
183 5 6 if $isname{$_}
184 2 2 if $takesarg{$_} or $accessor->{'is_array'} and $iselement{$_}
197 303 220 @$apkgs ? :
198 303 228 @$anames ? :
200 2436 303 @$tpkgs ? :
201 43 3 $tpkg->isa($apkg) ? :
2706 46 $apkg->isa($tpkg) ? :
204 2435 314 @$tnames ? :
211 5 130 if $adef->{'is_leaveby'} and $trap->leaveby ne $adef->{'name'}
224 1 654 unless $argspec{$_}
259 496 9 unless @_
260 6 3 if wantarray
272 82 31 unless $flexible
275 55 58 $par{'is_array'} ? :
276 4 109 unless $simple
315 16 607 unless (tied *$globref or defined($fileno = fileno $globref))
319 364 243 unless $m
320 298 309 unless $m
336 153 356 if $strategy
342 56 55 unless $arg
346 53 5 if $strategy
359 7 328 if (length ref $_ and eval { do { exists &$_ } })
371 3 325 unless my $meth = $trapper->can("layer:$name")