Branch Coverage

blib/lib/Test/Subunits.pm
Criterion Covered Total %
branch 19 22 86.3


line true false branch
13 1 13 unless (defined $source and length $source)
92 3 229 if (exists $+{'UNMATCHED_DELIM'}) { }
0 229 elsif (exists $+{'UNKNOWN_DELIM'}) { }
2 227 elsif (exists $+{'INVALID_WRAPPER'}) { }
42 185 elsif (exists $+{'EXTRACTED'}) { }
113 7 35 if (exists $+{'SUBNAME'})
136 5 8 unless eval "\n package $target_package;\n $extracted_code;\n 1;\n "
10 15 if ($list_elem > $count) { }
158 11 2 if ($source =~ /^\w+(?:::\w+)*$/)
166 13 10 if -e $file
170 0 0 if -e $source