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 7471 if ($key =~ /::$/u) { }
7337 134 elsif ($value->type eq 'GLOB') { }
163 0 7804 if $progress and $count % 1000 == 0
182 0 333 if $progress and $count % 1000 == 0
191 0 29151 unless my $sv = shift @user
197 1723 0 if $sv->rv
1723 27428 if ($_ eq 'REF') { }
424 27004 elsif ($_ eq 'ARRAY') { }
534 26470 elsif ($_ eq 'HASH') { }
4 26466 elsif ($_ eq 'GLOB') { }
5426 21040 elsif ($_ eq 'CODE') { }
0 21040 elsif ($_ eq 'LVALUE') { }
21040 0 elsif ($_ =~ /^(?:UNDEF|BOOL|SCALAR|IO|REGEXP|FORMAT)$/u) { }
202 4 0 if $gv->{'tool_reachable'}
217 0 5426 if ($padnames_av)
222 1 2615 unless $pad
226 2480 135 if (my $argsav = $pad->elem(0))
231 0 24062 $padnames_av ? :
232 0 24062 $padname_sv && $padname_sv->type eq 'SCALAR' ? :
235 631 23431 unless my $padsv = $pad->elem($padix)
236 0 23431 if $padsv->immortal
238 0 23431 if ($padname and $padname eq '&') { }
0 23431 elsif ($padname) { }
265 0 0 if $lv->target
281 0 29151 if $progress and $count % 1000 == 0
290 32 26865 unless my $sv = shift @internal
291 26649 216 if $sv->{'tool_reachable'}
295 616 0 $_->sv ? :
298 0 216 if $progress and $count % 1000 == 0