line |
true |
false |
branch |
73
|
0 |
11 |
if (my $versions = $me->d->{'versions'}) |
95
|
0 |
19 |
if /(?:^Build|\bMakefile)\.PL$/ |
|
0 |
11 |
unless $me->d->{'files_array'} |
99
|
0 |
19 |
if /\.PL$/ and not m[^t[\\/]] |
|
0 |
11 |
unless $me->d->{'files_array'} |
110
|
0 |
0 |
if $test_modules{$module} |
116
|
44 |
0 |
$uses{'test'}{$relationship} ? : |
123
|
0 |
0 |
if ($skip{$requirement} or $requirement =~ /^(?:inc|t)::/ or $phase eq 'test' and $test_modules{$requirement}) |
131
|
2 |
174 |
if (%$requirements) { } |
137
|
42 |
2 |
unless %{$uses{$phase};} |
153
|
0 |
9 |
unless $ctx->{'errors'} |
|
0 |
9 |
if (@{[] unless $ctx->{'errors'};}) |
157
|
0 |
9 |
if ($ctx->{'perl6'}) |
164
|
34 |
2 |
unless %$hash |
191
|
10 |
9 |
unless exists $files->{$file}{'module'} |
192
|
0 |
9 |
if $files->{$file}{'unreadable'} |
193
|
0 |
9 |
if $files->{$file}{'perl6'} |
194
|
0 |
9 |
if $file =~ /\.pod$/ |
198
|
2 |
7 |
if (defined $required_perl) |
200
|
2 |
0 |
if 'version'->parse($required_perl)->numify >= $perl_version_with_implicit_stricture |
204
|
7 |
0 |
if &none(sub {
exists $requires->{$_};
}
, @STRICT_EQUIV, @STRICT_WARNINGS_EQUIV) |
206
|
7 |
4 |
if (@no_strict) |
229
|
10 |
9 |
unless exists $files->{$file}{'module'} |
230
|
0 |
9 |
if $files->{$file}{'unreadable'} |
231
|
0 |
9 |
if $files->{$file}{'perl6'} |
232
|
0 |
9 |
if $file =~ /\.pod$/ |
235
|
9 |
0 |
if &none(sub {
exists $requires->{$_};
}
, @WARNINGS_EQUIV, @STRICT_WARNINGS_EQUIV) |
237
|
9 |
2 |
if (@no_warnings) |