Branch Coverage

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


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)