| line |
true |
false |
branch |
|
47
|
0 |
11 |
if (my $err = $@) |
|
48
|
0 |
0 |
unless eval "use ExtUtils::MakeMaker::version" |
|
58
|
4 |
1363 |
ref $sv eq 'B::PVMG' ? : |
|
60
|
1 |
0 |
if ($magic->TYPE eq 'V') { } |
|
80
|
0 |
0 |
if UNIVERSAL::isa($_[0], "UNIVERSAL") |
|
88
|
1131 |
608 |
if (not defined $version or not ref $version and $version eq '0') { } |
|
|
271 |
337 |
elsif (ref $version eq 'version' or ref $version and _isa_version($version)) { } |
|
96
|
0 |
337 |
if ($INC{'version/vpp.pm'} or $INC{'ExtUtils/MakeMaker/version/vpp.pm'}) |
|
98
|
0 |
0 |
if length $magic |
|
103
|
1 |
336 |
if $version eq "version" |
|
106
|
6 |
331 |
if (my $err = $@) |
|
107
|
4 |
2 |
if ref $bad_version_hook eq "CODE" |
|
109
|
3 |
3 |
unless (eval {
do {
$vobj->isa("version")
}
}) |
|
117
|
0 |
605 |
if ($vobj =~ /\A\./) |
|
122
|
22 |
583 |
if (_is_qv($vobj)) |
|
176
|
4 |
1363 |
unless (defined $req and length $req) |
|
182
|
1 |
1366 |
if (length $magic) |
|
191
|
1351 |
27 |
if (not defined $op) { } |
|
195
|
0 |
27 |
unless my $methods = $methods_for_op{$op} |
|
226
|
1597 |
131 |
unless ref $_[0] |
|
234
|
129 |
2 |
exists $s->{'minimum'} ? : |
|
|
14 |
117 |
exists $s->{'maximum'} ? : |
|
|
12 |
119 |
exists $s->{'exclusions'} ? : |
|
258
|
1 |
10 |
unless ($self->accepts($version)) |
|
271
|
31 |
1684 |
if (defined $self->{'minimum'} and defined $self->{'maximum'}) |
|
272
|
2 |
29 |
if ($self->{'minimum'} == $self->{'maximum'}) |
|
273
|
1 |
1 |
unless $self->{'exclusions'} |
|
|
1 |
1 |
if (grep {$_ == $self->{'minimum'};} @{[] unless $self->{'exclusions'};}) |
|
283
|
2 |
27 |
if ($self->{'minimum'} > $self->{'maximum'}) |
|
292
|
32 |
1679 |
if ($self->{'exclusions'}) |
|
299
|
30 |
1 |
if !defined($self->{'minimum'}) || $_ >= $self->{'minimum'} and !defined($self->{'maximum'}) || $_ <= $self->{'maximum'} |
|
326
|
91 |
1573 |
if (defined(my $old_min = $self->{'minimum'})) { } |
|
355
|
1 |
25 |
if (defined(my $old_max = $self->{'maximum'})) { } |
|
397
|
263 |
1 |
if exists $self->{'minimum'} |
|
398
|
3 |
261 |
if exists $self->{'maximum'} |
|
399
|
263 |
1 |
unless $self->{'exclusions'} |
|
415
|
0 |
1318 |
unless keys %$self |
|
417
|
1303 |
15 |
unless $self->{'exclusions'} |
|
426
|
1332 |
1304 |
if (exists $self->{$k}) |
|
428
|
1329 |
3 |
if (@new_exclusions == @exclusions) { } |
|
458
|
1297 |
20 |
if @parts == 1 and $parts[0][0] eq ">=" |
|
459
|
15 |
29 |
unless $_->[0] ne ">=" |
|
485
|
10 |
73 |
if defined $self->{'minimum'} and $version < $self->{'minimum'} |
|
486
|
6 |
67 |
if defined $self->{'maximum'} and $version > $self->{'maximum'} |
|
488
|
7 |
60 |
if defined $self->{'exclusions'} and grep {$version == $_;} @{$$self{"exclusions"};} |
|
503
|
1 |
3 |
if $self->as_string =~ /\s/ |
|
517
|
0 |
11 |
if (my $err = $@) |
|
518
|
0 |
0 |
unless eval "use ExtUtils::MakeMaker::version" |
|
540
|
2 |
1 |
if $self->accepts($version) |
|
553
|
0 |
1 |
if $self->{'version'} >= $minimum |
|
565
|
2 |
1 |
if $self->{'version'} <= $maximum |
|
577
|
2 |
1 |
unless $exclusion == $self->{'version'} |