| line |
true |
false |
branch |
|
51
|
30 |
4 |
if (ref $opts->{'source'} ne 'HASH' and ref $opts->{'source'} ne 'CODE') |
|
56
|
33 |
1 |
if (ref $opts->{'skip-tests-for'} ne 'ARRAY') |
|
64
|
3 |
31 |
exists $ENV{'PERL_USE_UNSAFE_INC'} ? : |
|
79
|
34 |
0 |
unless ($opts->{'install-man'}) |
|
104
|
14 |
5 |
unless (defined $source) |
|
112
|
0 |
5 |
if (defined $target) { } |
|
152
|
1 |
473 |
if ($target->{'state'} eq $COMPLETE or $target->{'state'} eq $FAILED) |
|
159
|
425 |
48 |
if exists $target->{'dir'} |
|
170
|
10 |
463 |
unless ($succ) |
|
181
|
0 |
10 |
if ($opts->{'stop-on-error'}) |
|
191
|
456 |
7 |
if $target->{'state'} ne $COMPLETE |
|
193
|
33 |
430 |
if ($target->{'state'} eq scalar @states) |
|
209
|
9 |
25 |
if (@failed > 0) |
|
225
|
6 |
44 |
unless _should_install($target) |
|
235
|
1 |
43 |
unless _should_install($target) |
|
240
|
43 |
0 |
if (@files == 1) |
|
265
|
1 |
42 |
unless defined $meta |
|
288
|
2 |
36 |
if (-e 'Build.PL' and not $is_mb_dep) |
|
293
|
0 |
2 |
unless $configured |
|
297
|
36 |
2 |
if (not defined $maker and -e 'Makefile.PL') |
|
302
|
0 |
36 |
unless $configured |
|
307
|
0 |
38 |
unless defined $maker |
|
319
|
38 |
0 |
if defined $new_meta |
|
351
|
37 |
1 |
unless ($skip_tests) |
|
356
|
20 |
17 |
if (not $skip_tests and defined $target->{'modules'}) |
|
360
|
0 |
40 |
if ($skips->{$module}) |
|
368
|
6 |
30 |
if (not $skip_tests and $opts->{'smart-tests'}) |
|
378
|
31 |
7 |
unless ($skip_tests) |
|
395
|
0 |
38 |
if (@incomplete_deps > 0) |
|
418
|
2 |
36 |
if ($target->{'maker'} eq 'mb') |
|
424
|
36 |
0 |
if ($target->{'maker'} eq 'mm') |
|
444
|
7 |
31 |
if ($target->{'skip_tests'}) |
|
449
|
2 |
29 |
if ($target->{'maker'} eq 'mb') |
|
455
|
29 |
0 |
if ($target->{'maker'} eq 'mm') |
|
475
|
2 |
31 |
if ($target->{'maker'} eq 'mb') |
|
481
|
31 |
0 |
if ($target->{'maker'} eq 'mm') |
|
497
|
15 |
18 |
if ($target->{'is_cpan'}) |
|
552
|
133 |
1021 |
if (ref $target eq '') |
|
554
|
2 |
131 |
if ($target =~ m[^ ([^/]+) @ (.*) $]msux) { } |
|
564
|
186 |
968 |
if (ref $target eq 'ARRAY') |
|
597
|
21 |
21 |
if ($alias =~ /$ident_re/u) |
|
616
|
76 |
471 |
unless (defined $cached_target) |
|
625
|
2 |
545 |
if ($cached_target->{'state'} eq $COMPLETE and $src->{'constraint'} ne $cached_target->{'constraint'}) |
|
636
|
652 |
989 |
if (defined $altname) |
|
638
|
37 |
615 |
unless (exists $cache->{'targets'}{$altname}) |
|
645
|
214 |
333 |
if ($src->{'src_name'} =~ /$ident_re/u) |
|
672
|
1 |
1 |
unless ($prereq->{'prereqs_was_installed'} and $prereq->{'was_installed'}) |
|
689
|
7 |
14 |
if exists $seen{$src}{$constraint} |
|
693
|
5 |
9 |
if (defined $constraint) |
|
700
|
14 |
0 |
if $ff->scheme eq 'https' |
|
705
|
0 |
14 |
unless defined $where |
|
720
|
26 |
32 |
if (-e -f $src) |
|
728
|
2 |
30 |
if ($src =~ git_re()) |
|
749
|
1 |
29 |
if ($src =~ url_re()) |
|
755
|
6 |
24 |
if ($src =~ /$pause_re/u) |
|
772
|
23 |
7 |
unless (defined $url) |
|
782
|
30 |
0 |
if (defined $url) |
|
785
|
27 |
3 |
if ($url =~ /$full_pause_re/u) |
|
797
|
28 |
2 |
if $ff->scheme eq 'https' |
|
800
|
0 |
30 |
unless defined $where |
|
812
|
0 |
71 |
if $module eq 'perl' |
|
820
|
58 |
13 |
unless (defined $ver) |
|
834
|
38 |
43 |
$my ? : |
|
842
|
80 |
28 |
if defined $meta |
|
863
|
219 |
57 |
if (exists $Module::CoreList::version{$]}{$module}) |
|
869
|
11 |
265 |
if $module ne 'perl' and not $is_core |
|
891
|
13 |
129 |
if -r $tmp |
|
901
|
44 |
50 |
unless defined $target->{'module'} |
|
908
|
30 |
20 |
unless defined $ver |
|
914
|
4 |
16 |
if $target->{'was_installed'} |
|
916
|
6 |
14 |
unless ($target->{'update'}) |
|
923
|
6 |
0 |
if ($req->accepts_module($module, $ver)) |
|
934
|
1 |
13 |
if (defined $target->{'version'} and $target->{'version'} eq $ver) |
|
955
|
44 |
0 |
if (ref $sources eq 'HASH') |
|
960
|
0 |
44 |
if (ref $sources eq 'CODE') |
|
965
|
0 |
44 |
if ($opts->{'only-sources'} and not defined $new_src) |
|
967
|
0 |
0 |
if (exists $Module::CoreList::version{$]}{$src_name}) |
|
975
|
5 |
39 |
defined $new_src ? : |
|
985
|
25 |
15 |
if (exists $target->{'installed_version'} and not $target->{'was_installed'}) |
|
991
|
20 |
5 |
if $ver eq $Module::CoreList::version{$]}{$module} |
|
994
|
0 |
40 |
if (exists $target->{'inital_version'} and not defined $target->{'inital_version'}) |
|
1000
|
0 |
0 |
if defined _get_mod_ver($target->{'module'}) |