Branch Coverage

blib/lib/Export/These.pm
Criterion Covered Total %
branch 68 106 64.1


line true false branch
39 0 20 if ref $k
41 12 8 unless ($r)
49 0 8 if (/export_ok$/ and $r eq 'ARRAY') { }
0 8 elsif (/export$/ and $r eq 'ARRAY') { }
2 6 elsif (/export_pass/ and $r eq 'ARRAY') { }
6 0 elsif ($r eq 'ARRAY') { }
57 2 0 unless ($$export_pass)
80 2 7 if ($exist)
176 2 1 @_ ? :
2 0 if $group
7 5 if ($name =~ s/^(\W)//) { }
0 0 $type eq '*' ? :
2 0 $type eq '%' ? :
2 2 $type eq '@' ? :
3 4 $type eq '$' ? :
5 7 $type eq '&' ? :
0 14 if (ref $_) { }
0 14 elsif (not $_) { }
2 12 elsif (/^:/) { }
1 1 @_ ? :
0 0 if $group
3 3 if ($name =~ s/^(\W)//) { }
0 0 $type eq '*' ? :
1 0 $type eq '%' ? :
1 1 $type eq '@' ? :
1 2 $type eq '$' ? :
3 3 $type eq '&' ? :
0 6 if (ref $_) { }
0 6 elsif (not $_) { }
0 6 elsif (/^:/) { }
1 1 @_ ? :
0 1 if $group
0 1 if ($name =~ s/^(\W)//) { }
0 0 $type eq '*' ? :
0 0 $type eq '%' ? :
0 0 $type eq '@' ? :
0 0 $type eq '$' ? :
1 0 $type eq '&' ? :
0 2 if (ref $_) { }
0 2 elsif (not $_) { }
1 1 elsif (/^:/) { }
3 5 if ($defined) { }
4 0 if ($defined)
1 11 if ($defined) { }
1 2 if ($defined)
0 2 if ($defined) { }
2 0 if ($defined)
1 6 @_ ? :
8 7 if $group
0 11 if ($name =~ s/^(\W)//) { }
0 11 $type eq '*' ? :
2 9 $type eq '%' ? :
177 0 7 unless $res