| line |
true |
false |
branch |
|
124
|
0 |
44 |
unless check($tmpl, \%hash)
|
|
126
|
0 |
44 |
unless (can_load("modules", {$format, "0.0"}, "verbose", 1))
|
|
153
|
1 |
43 |
if ($conf->_get_build("sanity_check") and not $obj->format_available)
|
|
159
|
1 |
42 |
unless ($obj->init)
|
|
197
|
5 |
94 |
if (not $Loaded++ and check_install("module", "Module::Pluggable", "version", "2.4"))
|
|
246
|
0 |
21 |
unless my $type = shift()
|
|
270
|
0 |
30 |
unless check($tmpl, \%hash)
|
|
272
|
11 |
19 |
if $mod->is_uptodate("version", $ver)
|
|
274
|
15 |
4 |
if ($cb->_vcmp($ver, $mod->version) > 0)
|
|
310
|
0 |
10 |
unless check($tmpl, \%hash)
|
|
321
|
9 |
1 |
defined $mod->status->extract ? :
|
|
327
|
1 |
9 |
if $meta
|
|
331
|
0 |
10 |
if ($mfile =~ /\.json/) { }
|
|
360
|
0 |
3 |
unless check($tmpl, \%hash)
|
|
371
|
3 |
0 |
defined $mod->status->extract ? :
|
|
377
|
0 |
3 |
if $meta
|
|
381
|
3 |
0 |
if ($mfile =~ /\.json/) { }
|
|
408
|
9 |
1 |
defined $mod->status->extract ? :
|
|
419
|
0 |
10 |
unless check($tmpl, \%hash)
|
|
422
|
10 |
0 |
if (-e $meta)
|
|
431
|
0 |
10 |
unless ($doc)
|
|
442
|
10 |
0 |
if $doc->{$key}
|
|
458
|
3 |
0 |
defined $mod->status->extract ? :
|
|
469
|
0 |
3 |
unless check($tmpl, \%hash)
|
|
472
|
3 |
0 |
if (-e $meta)
|
|
481
|
0 |
3 |
unless ($doc)
|
|
499
|
3 |
6 |
if $prereqs->{$key}{'requires'}
|
|
511
|
9 |
1 |
defined $mod->status->extract ? :
|
|
521
|
0 |
9 |
if ($mfile =~ /\.json/) { }
|
|
524
|
0 |
0 |
unless ($doc)
|
|
534
|
0 |
9 |
unless ($doc)
|
|
600
|
0 |
31 |
unless check($tmpl, \%hash)
|
|
603
|
0 |
31 |
unless keys %$prereqs
|
|
633
|
0 |
31 |
if ($self->module =~ /^Bundle(::|-)CPANPLUS(::|-)Dependencies/) { }
|
|
636
|
0 |
0 |
$mod =~ /CPANPLUS/ ? :
|
|
655
|
2 |
29 |
if ($mod eq "perl")
|
|
657
|
1 |
1 |
unless ($cb->_vcmp(sprintf("v%vd", $^V), $version) >= 0)
|
|
672
|
3 |
26 |
unless ($modobj)
|
|
677
|
0 |
3 |
unless (defined $core)
|
|
679
|
0 |
0 |
unless $tolerant
|
|
682
|
0 |
3 |
if ($cb->_vcmp($version, $core) > 0)
|
|
692
|
15 |
11 |
if (not $dist->prereq_satisfied('modobj', $modobj, 'version', $version)) { }
|
|
|
0 |
11 |
elsif (sub {
|
|
714
|
2 |
28 |
if ($target eq "ignore")
|
|
717
|
2 |
0 |
if (@install_me) { }
|
|
746
|
0 |
13 |
if not $force || $prereq_build and $dist->prereq_satisfied("modobj", $modobj, "version", $version)
|
|
751
|
1 |
12 |
if ($conf->get_conf("prereqs") == 2 and not $cb->_callbacks->install_prerequisite->($self, $modobj))
|
|
762
|
1 |
11 |
if (defined $modobj->status->installed and not $modobj->status->installed)
|
|
772
|
1 |
10 |
if ($modobj->package_is_perl_core)
|
|
784
|
1 |
9 |
if ($$pending{$modobj->module})
|
|
802
|
3 |
6 |
unless ($modobj->install(%$pa, %$ca, %$ia, "force", $force, "verbose", $verbose, "format", $format, "target", $target))
|
|
817
|
3 |
6 |
if $flag
|
|
820
|
3 |
3 |
if ($target ne "install")
|
|
821
|
0 |
3 |
unless my $dir = $modobj->status->extract
|
|
837
|
24 |
4 |
unless $flag
|