| line |
true |
false |
branch |
|
42
|
4 |
0 |
if ($Params{'file'}) |
|
45
|
0 |
4 |
if (ref $Params{'files'} eq 'ARRAY') { } |
|
|
0 |
8 |
elsif ($Params{'files'} and not ref $Params{'files'}) { } |
|
49
|
0 |
0 |
if (-d $Params{'files'}) { } |
|
|
0 |
0 |
elsif (-f $Params{'files'}) { } |
|
52
|
0 |
0 |
if $File::Find::name =~ /\.pm$/ |
|
61
|
0 |
4 |
unless -e $file |
|
66
|
4 |
28 |
if (/^\s*package\s+([a-zA-Z0-9]+(?:::[a-zA-Z0-9_]+)*)\s*/) |
|
69
|
4 |
28 |
if (/^\s*(?:our\s+)?\$VERSION\s*=\s*['"]?([0-9a-z\.]+)['"]?\s*;/) |
|
74
|
0 |
4 |
unless $package |
|
75
|
0 |
4 |
if $Modules{$package} |
|
140
|
0 |
4 |
unless move("$newpath.pm", "$final_path/$module_basename.pm") |
|
142
|
8 |
8 |
unless -e "$newpath.$_" |
|
143
|
0 |
8 |
unless move("$newpath.$_", "$final_path_auto/") |
|
380
|
4 |
0 |
$allow_debug ? : |
|
391
|
132 |
1928 |
if ($i & 15) == 0 |
|
395
|
128 |
1932 |
if ($i & 15) == 15 |
|
398
|
4 |
4 |
unless $output =~ /"$/ |