| line |
true |
false |
branch |
|
20
|
0 |
12 |
if ($me->d->{'meta_yml'} and $me->d->{'meta_yml'}{'provides'}) { } |
|
24
|
0 |
0 |
unless ref $data eq ref {} |
|
33
|
0 |
0 |
if ($file =~ /^lib\W/) { } |
|
|
0 |
0 |
elsif (not $file =~ m[/]) { } |
|
41
|
0 |
0 |
if (exists $me->d->{'files_hash'}{$file}) { } |
|
43
|
0 |
0 |
if ($file =~ /\b$path_part\.pm$/) { } |
|
|
0 |
0 |
elsif ("$path_part.pm" =~ /\b$file$/) { } |
|
57
|
11 |
9 |
unless $file =~ /\.pm$/ |
|
58
|
0 |
9 |
if $file =~ m[^x?t/] |
|
59
|
0 |
9 |
if $file =~ m[^test/] |
|
60
|
0 |
9 |
if $file =~ m[^(bin|scripts?|ex|eg|examples?|samples?|demos?)/\w]i |
|
61
|
0 |
9 |
if $file =~ m[^inc/] |
|
62
|
0 |
9 |
if $file =~ m[^(local|perl5|fatlib)/] |
|
65
|
6 |
3 |
if ($file =~ m[^lib/(.*)\.pm$]) { } |
|
81
|
0 |
3 |
unless open my $fh, "<", catfile($me->distdir, $file) |
|
83
|
0 |
3 |
if $line =~ /^\s*#/ |
|
84
|
3 |
0 |
if ($line =~ /^\s*package\s*(.*?)\s*;/) |
|
86
|
3 |
0 |
if $basename and $module =~ /\b$basename$/ |
|
88
|
0 |
0 |
if $line =~ /^__(DATA|END)__/ |
|
90
|
0 |
0 |
unless $max_lines_to_look_at |
|
93
|
0 |
3 |
unless ($module) |
|
99
|
3 |
0 |
if ($module) |
|
103
|
3 |
0 |
$in_basedir{$file} ? : |
|
113
|
20 |
0 |
unless $file =~ m[^inc/(.+)\.pm] |
|
119
|
9 |
3 |
if (exists $me->d->{'modules'}) |
|
122
|
0 |
12 |
if (exists $me->d->{'included_modules'}) |
|
144
|
3 |
9 |
unless $d->{'modules'} |
|
145
|
3 |
9 |
unless @modules |
|
148
|
6 |
3 |
unless @not_in_lib |
|
151
|
3 |
0 |
if @in_basedir == 1 |
|
159
|
0 |
0 |
unless $d->{'modules'} |
|
160
|
0 |
0 |
unless @modules |
|
171
|
3 |
9 |
unless $d->{'modules'} |
|
172
|
3 |
9 |
unless @modules |
|
174
|
0 |
9 |
if (my(@not_exists) = grep({$_->{'not_exists'};} @modules)) |
|
182
|
0 |
0 |
unless $d->{'modules'} |
|
183
|
0 |
0 |
unless @modules |