| line |
true |
false |
branch |
|
40
|
0 |
0 |
if ($curr >= 0 and $curr <= $last) { } |
|
80
|
0 |
0 |
unless (ref $right) |
|
88
|
0 |
0 |
unless (ref $right) |
|
89
|
0 |
0 |
if (length $right == 1) |
|
116
|
0 |
0 |
if (defined $s and $s->{'current'} < $last) |
|
174
|
0 |
0 |
unless ($class eq $ExtUtils::MakeMaker::version::vpp::CLASS) |
|
181
|
0 |
0 |
if (@_) { } |
|
194
|
0 |
0 |
if (exists $args{'declare'}) |
|
197
|
0 |
0 |
unless defined &{$callpkg . '::declare';} |
|
200
|
0 |
0 |
if (exists $args{'qv'}) |
|
203
|
0 |
0 |
unless defined &{$callpkg . '::qv';} |
|
206
|
0 |
0 |
if (exists $args{'UNIVERSAL::VERSION'}) |
|
212
|
0 |
0 |
if (exists $args{'VERSION'}) |
|
216
|
0 |
0 |
if (exists $args{'is_strict'}) |
|
218
|
0 |
0 |
unless defined &{$callpkg . '::is_strict';} |
|
221
|
0 |
0 |
if (exists $args{'is_lax'}) |
|
223
|
0 |
0 |
unless defined &{$callpkg . '::is_lax';} |
|
250
|
0 |
0 |
if ($errstr) |
|
258
|
0 |
0 |
defined $sqv ? : |
|
259
|
0 |
0 |
defined $ssaw_decimal ? : |
|
260
|
0 |
0 |
defined $swidth ? : |
|
261
|
0 |
0 |
defined $salpha ? : |
|
265
|
0 |
0 |
if ($qv and isDIGIT($d)) |
|
269
|
0 |
0 |
if ($d eq 'v') { } |
|
271
|
0 |
0 |
if (isDIGIT($d)) { } |
|
280
|
0 |
0 |
if ($strict and $d eq 0 and isDIGIT($d + 1)) |
|
289
|
0 |
0 |
if ($d eq '.') { } |
|
296
|
0 |
0 |
if ($strict) { } |
|
313
|
0 |
0 |
if ($strict and $j > 3) |
|
317
|
0 |
0 |
if ($d eq '_') { } |
|
|
0 |
0 |
elsif ($d eq '.') { } |
|
|
0 |
0 |
elsif (not isDIGIT($d)) { } |
|
318
|
0 |
0 |
if ($strict) |
|
321
|
0 |
0 |
if ($alpha) |
|
328
|
0 |
0 |
if ($alpha) |
|
340
|
0 |
0 |
if ($strict and $i < 2) |
|
350
|
0 |
0 |
if ($strict) |
|
351
|
0 |
0 |
if ($d eq ".") |
|
354
|
0 |
0 |
if ($d eq 0 and isDIGIT($d + 1)) |
|
360
|
0 |
0 |
if ($d eq "-") |
|
370
|
0 |
0 |
if ($d eq '.') { } |
|
|
0 |
0 |
elsif (not $d or $d eq ';' or isSPACE($d) or $d eq '}') { } |
|
|
0 |
0 |
elsif ($d == $s) { } |
|
|
0 |
0 |
elsif ($d eq '_') { } |
|
|
0 |
0 |
elsif ($d) { } |
|
376
|
0 |
0 |
if ($d == $s) |
|
389
|
0 |
0 |
if ($strict) { } |
|
|
0 |
0 |
elsif (isDIGIT($d + 1)) { } |
|
405
|
0 |
0 |
if ($d and not isDIGIT($d) and $strict || !($d eq ';' || isSPACE($d) || $d eq '}')) |
|
412
|
0 |
0 |
if ($d eq "." and isDIGIT($d - 1)) |
|
413
|
0 |
0 |
if ($alpha) |
|
416
|
0 |
0 |
if ($strict) |
|
423
|
0 |
0 |
if ($d eq "_") |
|
424
|
0 |
0 |
if ($strict) |
|
427
|
0 |
0 |
if ($alpha) |
|
430
|
0 |
0 |
unless (isDIGIT($d + 1)) |
|
445
|
0 |
0 |
if ($d and not isDIGIT($d) and not $d eq ';' || $d eq '}') |
|
450
|
0 |
0 |
if (defined $sqv) |
|
453
|
0 |
0 |
if (defined $swidth) |
|
456
|
0 |
0 |
if (defined $ssaw_decimal) |
|
459
|
0 |
0 |
if (defined $salpha) |
|
486
|
0 |
0 |
if ($errstr) |
|
488
|
0 |
0 |
if ($s ne "undef") |
|
495
|
0 |
0 |
if ($s eq "v") |
|
500
|
0 |
0 |
if ($qv) |
|
503
|
0 |
0 |
if ($alpha) |
|
506
|
0 |
0 |
if (not $qv and $width < 3) |
|
513
|
0 |
0 |
unless (isALPHA($pos)) |
|
528
|
0 |
0 |
if (not $qv and $s > $start and $saw_decimal == 1) { } |
|
534
|
0 |
0 |
if (abs $orev > abs $rev or abs $rev > $VERSION_MAX) |
|
543
|
0 |
0 |
if ($s eq "_") |
|
553
|
0 |
0 |
if (abs $orev > abs $rev or abs $rev > $VERSION_MAX) |
|
566
|
0 |
0 |
if ($vinf) { } |
|
|
0 |
0 |
elsif ($pos eq '.') { } |
|
|
0 |
0 |
elsif ($pos eq '_' and isDIGIT($pos + 1)) { } |
|
|
0 |
0 |
elsif ($pos eq ',' and isDIGIT($pos + 1)) { } |
|
|
0 |
0 |
elsif (isDIGIT($pos)) { } |
|
586
|
0 |
0 |
if ($qv) { } |
|
594
|
0 |
0 |
if ($pos ne "_") |
|
602
|
0 |
0 |
if ($qv) |
|
618
|
0 |
0 |
if ($vinf) { } |
|
|
0 |
0 |
elsif ($s > $start) { } |
|
624
|
0 |
0 |
if ($qv and $saw_decimal == 1 and $start ne "v") |
|
638
|
0 |
0 |
if ($s eq "undef") |
|
647
|
0 |
0 |
unless (defined $class or $#_ > 1) |
|
655
|
0 |
0 |
if ($#_ == 1) |
|
660
|
0 |
0 |
if (ref $value and eval "\$value->isa(\"version\")") |
|
663
|
0 |
0 |
if $value->{'qv'} |
|
664
|
0 |
0 |
if $value->{'alpha'} |
|
669
|
0 |
0 |
if (not defined $value or $value =~ /^undef$/) |
|
678
|
0 |
0 |
if (ref($value) =~ /ARRAY|HASH/) |
|
685
|
0 |
0 |
if ($ExtUtils::MakeMaker::version::vpp::Config{'d_setlocale'} and eval {
do {
require POSIX
}
}) |
|
692
|
0 |
0 |
if (POSIX::localeconv()->{'decimal_point'} eq ",") |
|
698
|
0 |
0 |
if ($value =~ /\d+.?\d*e[-+]?\d+/) |
|
705
|
0 |
0 |
if ($s) |
|
717
|
0 |
0 |
unless (_verify($self)) |
|
729
|
0 |
0 |
if ($width < 3) { } |
|
740
|
0 |
0 |
if ($len > 0) { } |
|
742
|
0 |
0 |
if ($alpha and $width == 3) |
|
757
|
0 |
0 |
unless (_verify($self)) |
|
771
|
0 |
0 |
if ($len > 0) |
|
773
|
0 |
0 |
if ($alpha) { } |
|
781
|
0 |
0 |
if ($len <= 2) |
|
792
|
0 |
0 |
unless (_verify($self)) |
|
799
|
0 |
0 |
exists $self->{'qv'} ? : |
|
|
0 |
0 |
exists $self->{'original'} ? : |
|
807
|
0 |
0 |
unless (UNIVERSAL::isa($right, $class)) |
|
811
|
0 |
0 |
if ($swap) |
|
814
|
0 |
0 |
unless (_verify($left)) |
|
818
|
0 |
0 |
unless (_verify($right)) |
|
824
|
0 |
0 |
$l < $r ? : |
|
835
|
0 |
0 |
if ($retval == 0 and $l == $r and $left->{'version'}[$m] == $right->{'version'}[$m] and $lalpha || $ralpha) |
|
840
|
0 |
0 |
if ($lalpha and not $ralpha) { } |
|
|
0 |
0 |
elsif ($ralpha and not $lalpha) { } |
|
849
|
0 |
0 |
if ($retval == 0 and $l != $r) |
|
850
|
0 |
0 |
if ($l < $r) { } |
|
852
|
0 |
0 |
if ($right->{'version'}[$i] != 0) |
|
860
|
0 |
0 |
if ($left->{'version'}[$i] != 0) |
|
889
|
0 |
0 |
if (@_) |
|
895
|
0 |
0 |
unless $value =~ /(^v|\d+\.\d+\.\d)/ |
|
910
|
0 |
0 |
if (ref $self and eval {
do {
exists $self->{'version'}
}
} and ref $self->{'version'} eq 'ARRAY') { } |
|
925
|
0 |
0 |
if isSPACE($s) |
|
926
|
0 |
0 |
unless isALPHA($s) or isDIGIT($s) or $s =~ /[.-]/ |
|
935
|
0 |
0 |
if (length $value >= 3 and not $value =~ /[._]/ and _is_non_alphanumeric($value)) |
|
938
|
0 |
0 |
if ("$]" >= 5.008001) { } |
|
|
0 |
0 |
elsif ("$]" >= 5.006) { } |
|
940
|
0 |
0 |
if length $tvalue |
|
944
|
0 |
0 |
if ($tvalue =~ /^v\d+(\.\d+){2,}$/) |
|
958
|
0 |
0 |
ref $sv eq 'B::PVMG' ? : |
|
960
|
0 |
0 |
if ($magic->TYPE eq 'V') { } |
|
977
|
0 |
0 |
if (exists $INC{"$class.pm"} and not %{"${class}::";} and "$]" >= "5.008") |
|
985
|
0 |
0 |
if (defined $version) |
|
986
|
0 |
0 |
if "$]" <= "5.008" |
|
990
|
0 |
0 |
if (defined $req) |
|
991
|
0 |
0 |
unless (defined $version) |
|
993
|
0 |
0 |
"$]" < 5.006 ? : |
|
998
|
0 |
0 |
if ($ENV{'VERSION_DEBUG'}) { } |
|
1008
|
0 |
0 |
if ($req > $version) |
|
1010
|
0 |
0 |
if ($req->is_qv) { } |
|
1027
|
0 |
0 |
defined $version ? : |