| line |
true |
false |
branch |
|
24
|
0 |
1 |
if (&isvstring($raw)) |
|
27
|
0 |
1 |
if ($raw =~ / \A v5 (?> \. \d+)* \z /x) { } |
|
|
0 |
1 |
elsif ($raw eq 'latest') { } |
|
40
|
0 |
3 |
unless grep {$_;} values %args |
|
42
|
1 |
2 |
defined $args{'omit_core'} ? : |
|
43
|
1 |
2 |
if ($core_version) |
|
45
|
0 |
1 |
unless exists $Module::CoreList::version{$core_version} |
|
50
|
15 |
0 |
if $req->accepts_module('perl', $core_version) |
|
52
|
1 |
1 |
unless exists $Module::CoreList::version{$core_version}{$module} |
|
53
|
0 |
1 |
unless $req->accepts_module($module, $Module::CoreList::version{$core_version}{$module}) |
|
54
|
0 |
1 |
if 'Module::CoreList'->is_deprecated($module, $core_version) |
|
60
|
0 |
3 |
if ($args{'sanitize'}) |
|
67
|
0 |
0 |
unless defined(my $right = $sink->requirements_for_module($module)) |
|
69
|
0 |
0 |
if $left eq $right or $right eq '0' |
|
75
|
1 |
2 |
if ($args{'only_missing'}) |
|
80
|
15 |
0 |
if $req->accepts_module('perl', $]) |
|
82
|
1 |
2 |
if ($req->requirements_for_module($module)) { } |
|
84
|
0 |
1 |
if ($metadata and $req->accepts_module($module, $metadata->version($module) || 0)) |
|
89
|
2 |
0 |
if 'Module::Metadata'->find_module_by_name($module) |