| line |
true |
false |
branch |
|
23
|
0 |
1 |
if (&isvstring($raw)) |
|
26
|
0 |
1 |
if ($raw =~ / \A v5 (?> \. \d+)* \z /x) { } |
|
|
0 |
1 |
elsif ($raw eq 'latest') { } |
|
39
|
0 |
3 |
unless grep {$_;} values %args |
|
41
|
1 |
2 |
defined $args{'omit_core'} ? : |
|
42
|
1 |
2 |
if ($core_version) |
|
44
|
0 |
1 |
unless exists $Module::CoreList::version{$core_version} |
|
49
|
15 |
0 |
if $req->accepts_module('perl', $core_version) |
|
51
|
1 |
1 |
unless exists $Module::CoreList::version{$core_version}{$module} |
|
52
|
0 |
1 |
unless $req->accepts_module($module, $Module::CoreList::version{$core_version}{$module}) |
|
53
|
0 |
1 |
if 'Module::CoreList'->is_deprecated($module, $core_version) |
|
59
|
0 |
3 |
if ($args{'sanitize'}) |
|
66
|
0 |
0 |
unless defined(my $right = $sink->requirements_for_module($module)) |
|
68
|
0 |
0 |
if $left eq $right or $right eq '0' |
|
74
|
1 |
2 |
if ($args{'only_missing'}) |
|
79
|
15 |
0 |
if $req->accepts_module('perl', $]) |
|
81
|
1 |
2 |
if ($req->requirements_for_module($module)) { } |
|
83
|
0 |
1 |
if ($metadata and $req->accepts_module($module, $metadata->version($module) || 0)) |
|
88
|
2 |
0 |
if 'Module::Metadata'->find_module_by_name($module) |