| line |
true |
false |
branch |
|
97
|
1 |
0 |
if ($Perl::Modern::Perl::PERL_VERSION =~ /^v5[.](\d\d).+$/msux) { } |
|
106
|
1 |
0 |
unless ($version) |
|
109
|
0 |
1 |
if ($version =~ /^5[.](1[13579]|2[13])$/imsux) |
|
112
|
1 |
0 |
if ($version =~ /^5[.](1[02468]|2[02])$/imsux) { } |
|
124
|
0 |
1 |
if ($perl_version < $feature_version) |
|
130
|
0 |
1 |
unless eval {
do {
$use
}
} |
|
139
|
7 |
8 |
if ($FEATURES{$feature}[$version_idx] eq '++++') |
|
146
|
11 |
0 |
if ($WARNINGS{$warning}[$version_idx] ne '----') |
|
156
|
0 |
0 |
if (exists $FEATURES{$delete}) |
|
158
|
0 |
0 |
if ($FEATURES{$delete}[$version_idx] ne '----') { } |
|
165
|
0 |
0 |
if (exists $WARNINGS{$delete}) |
|
167
|
0 |
0 |
if ($WARNINGS{$delete}[$version_idx] ne '----') |
|
171
|
0 |
0 |
unless ($flag) |