Branch Coverage
blib/lib/Class/ModuleByFile.pm
Criterion
Covered
Total
%
branch
4
8
50.0
line
true
false
branch
54
0
2
unless my $file = shift()
56
0
2
unless (-e $file)
59
2
0
if (defined $fh)
62
2
0
if ($line =~ /\s*package\s+([^ ;]+)/)