Branch Coverage

blib/lib/Test/Vars.pm
Criterion Covered Total %
branch 79 98 80.6


line true false branch
31 0 2 unless (-f $ExtUtils::Manifest::MANIFEST)
37 0 2 unless (@libs)
46 0 1 unless _vars_ok(\&Test::Vars::_results_as_tests, $lib, \%args)
90 176 0 if (defined $pid) { }
91 142 34 if ($pid != 0) { }
116 33 1 if ($file =~ /\./) { }
128 1 33 if (ref $args->{'ignore_vars'} eq "ARRAY")
132 33 1 unless (exists $args->{'ignore_vars'}{'$self'})
144 33 1 if ($file =~ s[\A (.*\b lib)/][]msx)
149 2 32 if ($@)
172 0 186 if (ref ${$ref;} eq "CODE")
181 1 185 if ref $ref ne "GLOB"
188 74 111 if ($hashref || $coderef and $gv->FILE =~ /\Q$file\E\z/msx)
189 0 74 if ($hashref and B::svref_2object($hashref)->NAME) { }
74 0 elsif ($coderef) { }
190 0 0 unless (_check_into_stash($hashref, $file, $args, $results))
196 10 64 unless (_check_into_code($coderef, $args, $results))
212 0 74 if ($cv->XSUB or $cv->ROOT->isa("B::NULL"))
227 887 406 unless defined $p and not $p->{'outside'}
229 17 389 if (not $p->{'count'}) { }
230 4 13 if $args->{'ignore_vars'}{$p->{'name'}}
232 2 11 if (my $cb = $args->{'ignore_if'})
234 2 0 if &$cb($_)
272 0 45 $aelemfast == -1 ? :
276 45 0 if ($padsv_store != -1)
281 45 0 if ($aelemfastlex_store != -1)
314 1653 0 if ($padname->can("PVX"))
321 515 1 if (defined $pv and length $pv and $pv ne "&" and $pv ne "\$" and not $padname->FLAGS & 16)
325 112 403 $padname->FLAGS & 16777216 ? :
326 112 403 if ($p{'outside'})
347 90 0 if (${$root;}) { }
374 3 7006 if $stringy_eval_seen
377 5632 1374 unless defined $padops[$optype]
379 1 1373 if ($optype == $op_entereval)
390 150 1223 if ($op->isa("B::UNOP_AUX"))
397 0 312 unless do {
401 162 150 if $pad->[$i]
408 16 1207 if $targ == 0
413 16 1191 if ($optype == $op_anoncode) { }
263 928 elsif ($optype == $op_enteriter or ($op->flags & 3) == 1) { }
168 760 elsif ($op->private & 128) { }
415 16 0 if ($anon_cv->CvFLAGS & 32)
421 80 44 if (defined $p and $p->{'outside_padix'})
430 261 2 if (_ckwarn_once($cop))
446 344 158 unless $o->type == $op_null
450 67 5 if $op_svusers[$_->type] and ($_->flags & 3) == 1 and $_->type != $padsv_store
67 101 if (&all(sub {
452 67 0 if (_ckwarn_once($cop))
470 320 10 if (ref $w eq 'B::SPECIAL') { }