Branch Coverage

blib/lib/Devel/MAT/Tool/Reachability.pm
Criterion Covered Total %
branch 41 60 68.3


line true false branch
136 0 333 unless $stash->type =~ /^(?:STASH|CLASS)$/u
146 333 7473 if ($key =~ /::$/u) { }
7339 134 elsif ($value->type eq 'GLOB') { }
163 0 7806 if $progress and $count % 1000 == 0
182 0 333 if $progress and $count % 1000 == 0
191 0 29143 unless my $sv = shift @user
197 1723 0 if $sv->rv
1723 27420 if ($_ eq 'REF') { }
424 26996 elsif ($_ eq 'ARRAY') { }
536 26460 elsif ($_ eq 'HASH') { }
4 26456 elsif ($_ eq 'GLOB') { }
5425 21031 elsif ($_ eq 'CODE') { }
0 21031 elsif ($_ eq 'LVALUE') { }
21031 0 elsif ($_ =~ /^(?:UNDEF|BOOL|SCALAR|IO|REGEXP|FORMAT)$/u) { }
202 4 0 if $gv->{'tool_reachable'}
217 0 5425 if ($padnames_av)
222 1 2614 unless $pad
226 2479 135 if (my $argsav = $pad->elem(0))
231 0 24056 $padnames_av ? :
232 0 24056 $padname_sv && $padname_sv->type eq 'SCALAR' ? :
235 629 23427 unless my $padsv = $pad->elem($padix)
236 0 23427 if $padsv->immortal
238 0 23427 if ($padname and $padname eq '&') { }
0 23427 elsif ($padname) { }
265 0 0 if $lv->target
281 0 29143 if $progress and $count % 1000 == 0
290 32 26863 unless my $sv = shift @internal
291 26647 216 if $sv->{'tool_reachable'}
295 616 0 $_->sv ? :
298 0 216 if $progress and $count % 1000 == 0