lib/Devel/Deanonymize.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 2 | 16 | 12.5 |
line | true | false | branch |
---|---|---|---|
92 | 1 | 0 | $_[1] ? : |
116 | 0 | 0 | if ($input =~ /^[\s]*(__END__|1;|1\Z|__DATA__)[\s]*$(.*)\Z/gms) |
131 | 6 | 0 | unless $filename =~ /$include_pattern/ |
132 | 0 | 0 | if (my $found = (grep {-e $_;} map({"$_/$filename";} grep({not ref $_;} @INC)))[0]) { } |
133 | 0 | 0 | if $ENV{'DEANONYMIZE_DEBUG'} |
135 | 0 | 0 | unless open my $fh, "<", $found |
139 | 0 | 0 | unless (hasEndmarker($module_text)) |
149 | 0 | 0 | if ($ENV{'DEANONYMIZE_DEBUG'}) |