Branch Coverage

blib/lib/Test/Config/System.pm
Criterion Covered Total %
branch 61 64 95.3


line true false branch
128 1 4 unless ($pkg)
137 2 2 unless defined $res
140 1 1 $invert ? :
173 1 4 unless (ref $list)
183 1 6 unless defined $res
184 2 4 if $res
188 1 2 $invert ? :
197 0 11 if exists $ENV{'SHELL'}
210 10 1 if ($pkg =~ /^([A-Za-z0-9-+._]+)/) { }
217 8 2 if (exists $_pkgmgrs{$pkgmgr}) { }
269 1 5 unless ($filename)
273 1 4 if (ref $regex ne 'Regexp')
282 1 3 $invert ? :
289 2 2 unless $res
327 0 4 unless (eval { do { symlink '', ''; 1 } })
333 1 3 unless ($src)
343 1 2 if (not $link) { }
1 1 elsif ($target) { }
346 1 0 $link eq $target ? :
351 1 2 $invert ? :
394 1 6 unless ($path)
404 2 4 unless (-d $path)
405 1 1 $invert ? :
409 1 3 $invert ? :
415 1 6 unless ($path)
424 2 4 unless (-f $path)
425 1 1 $invert ? :
429 1 3 $invert ? :
444 7 1 if (ref $stat eq 'HASH')
451 7 1 if (exists $tbl{$key})
452 3 4 $attrs[$tbl{$key}] == $val ? :
454 4 4 unless $res