| line |
!l |
l&&!r |
l&&r |
condition |
|
89
|
0 |
0 |
2 |
&Test::More::isa_ok($modules, 'ARRAY', 'modules list') && $return |
|
135
|
1 |
0 |
3 |
Test::More::subtest('Retrieve versions for all modules listed.', sub {
Test::More::plan('tests', scalar(@$modules) * 2);
foreach my $module (@$modules) {
&Test::More::use_ok($module);
my $version = $module->VERSION;
my $version_declared = &Test::More::ok(defined $version, "Module $module declares a version.");
$version = '(undef)' unless $version_declared;
$versions->{$version} ||= [];
push @{$$versions{$version};}, $module;
} ;
}
) && $return |
|
144
|
2 |
0 |
2 |
$has_only_one_version && $has_only_one_version |
|
257
|
56 |
14 |
2 |
defined $excluded_patterns and $file =~ /$excluded_patterns/ |