Branch Coverage

blib/lib/Module/CPANTS/Kwalitee/Uses.pm
Criterion Covered Total %
branch 34 56 60.7


line true false branch
74 0 11 if (my $versions = $me->d->{'versions'})
96 0 19 if /(?:^Build|\bMakefile)\.PL$/
0 11 unless $me->d->{'files_array'}
100 0 19 if /\.PL$/ and not m[^t[\\/]]
0 11 unless $me->d->{'files_array'}
111 0 0 if $test_modules{$module}
117 44 0 $uses{'test'}{$relationship} ? :
124 0 0 if ($skip{$requirement} or $requirement =~ /^(?:inc|t)::/ or $phase eq 'test' and $test_modules{$requirement})
132 2 174 if (%$requirements) { }
138 42 2 unless %{$uses{$phase};}
154 0 9 unless $ctx->{'errors'}
0 9 if (@{[] unless $ctx->{'errors'};})
161 0 9 if ($ctx->{'perl6'})
168 34 2 unless %$hash
195 10 9 unless exists $files->{$file}{'module'}
196 0 9 if $files->{$file}{'unreadable'}
197 0 9 if $files->{$file}{'perl6'}
198 0 9 if $file =~ /\.pod$/
202 2 7 if (defined $required_perl)
204 2 0 if 'version'->parse($required_perl)->numify >= $perl_version_with_implicit_stricture
208 7 0 if &none(sub { exists $requires->{$_}; } , @STRICT_EQUIV, @STRICT_WARNINGS_EQUIV)
210 7 4 if (@no_strict)
233 10 9 unless exists $files->{$file}{'module'}
234 0 9 if $files->{$file}{'unreadable'}
235 0 9 if $files->{$file}{'perl6'}
236 0 9 if $file =~ /\.pod$/
239 9 0 if &none(sub { exists $requires->{$_}; } , @WARNINGS_EQUIV, @STRICT_WARNINGS_EQUIV)
241 9 2 if (@no_warnings)