| line |
true |
false |
branch |
|
28
|
0 |
11 |
if ($^O eq 'MSWin32') |
|
41
|
2 |
9 |
if (-f '.perl-version') |
|
46
|
0 |
2 |
unless ($pv_ver =~ /$perl5_re/u) |
|
56
|
11 |
0 |
if (not $version and $src_tz =~ m[$perl5_ver_re [^/]* $]msux) |
|
65
|
0 |
11 |
if (-e -x "$dest_dir/bin/perl") |
|
67
|
0 |
0 |
unless ($opts->{'is_restarted_process'}) |
|
70
|
0 |
0 |
if ($version and $^V ne "v$version") { } |
|
92
|
11 |
0 |
unless (-e 'Configure') |
|
95
|
0 |
11 |
if (@files > 1) |
|
108
|
10 |
1 |
!$opts->{'skip-local'} ? : |
|
|
5 |
6 |
!$opts->{'skip-lib'} && -d $lib_dir ? : |
|
118
|
1 |
10 |
if ($opts->{'threads'}) |
|
123
|
1 |
10 |
if ($opts->{'devel'}) |
|
147
|
3 |
8 |
if (not $skip_tests and $opts->{'smart-tests'}) |
|
152
|
10 |
1 |
unless ($skip_tests) |
|
200
|
0 |
12 |
unless (defined $src) |
|
208
|
0 |
0 |
&App::MechaCPAN::Perl::localtime()->mon < 4 ? : |
|
217
|
0 |
0 |
if (not defined $where and $major > 12) |
|
228
|
11 |
1 |
if (-e $src) |
|
236
|
0 |
1 |
if ($src =~ url_re()) |
|
242
|
1 |
0 |
if ($src =~ /$perl5_re/u) |
|
248
|
1 |
0 |
unless (defined $minor) |
|
262
|
2 |
2 |
if (defined $where) { } |