| line |
true |
false |
branch |
|
19
|
1 |
67 |
unless (defined $perlver) |
|
22
|
49 |
18 |
unless defined $config->{'lax'} |
|
23
|
0 |
67 |
if (_env_hasopt('always_lax')) |
|
27
|
46 |
21 |
if ($perlver =~ /\Av?[\d.]+\z/msx) |
|
31
|
13 |
8 |
if ($perlver =~ /\Av?[\d._]+(-TRIAL)?\z/msx) |
|
32
|
11 |
2 |
if ($config->{'lax'} > 0) |
|
38
|
6 |
2 |
if (2 == $config->{'lax'}) |
|
62
|
1 |
24 |
unless (exists $char_map->{$char}) |
|
79
|
0 |
14 |
unless (@tokens) |
|
82
|
4 |
10 |
if (@tokens < 2) |
|
124
|
5 |
12 |
if ($version =~ s/-TRIAL\z//msx) |
|
127
|
6 |
11 |
if ($version =~ s/_(.*)\z/$1/msx) |
|
130
|
1 |
5 |
if ($prereleasever =~ /_/msx) |
|
135
|
10 |
6 |
if ($isdev) |
|
151
|
0 |
6 |
if ($version =~ s/-TRIAL\z//msx) |
|
154
|
0 |
6 |
if ($version =~ s/\Av//msx) |
|
161
|
12 |
18 |
if (/\A[_.]\z/msx) |
|
165
|
12 |
6 |
if (/\A\d\z/msx) |
|
173
|
0 |
6 |
if ($istrial) |
|
176
|
0 |
6 |
if ($has_v) |