| line |
true |
false |
branch |
|
33
|
0 |
791 |
unless my $scheme = delete $params{'scheme'} |
|
34
|
0 |
791 |
unless my $constraints = delete $params{'constraints'} |
|
40
|
6 |
1150 |
if (ref $constraint ne "URI::VersionRange::Constraint") |
|
68
|
0 |
737 |
unless my $scheme = delete $params{'scheme'} |
|
69
|
1 |
736 |
unless my $range = delete $params{'range'} |
|
80
|
1 |
790 |
unless ($string =~ /$VERS_REGEXP/) |
|
84
|
2 |
788 |
if ($string =~ m[^vers\:(none|all)/] and not $string =~ m[^vers\:(none|all)/\*$]) |
|
158
|
16 |
7 |
if $constraint->comparator eq "*" |
|
165
|
0 |
7 |
if $constraint->comparator eq "=" |
|
166
|
0 |
7 |
if $constraint->comparator eq "!=" |
|
167
|
1 |
6 |
if $constraint->comparator eq "<=" |
|
168
|
1 |
5 |
if $constraint->comparator eq ">=" |
|
169
|
4 |
1 |
if $constraint->comparator eq "<" |
|
170
|
1 |
0 |
if $constraint->comparator eq ">" |
|
185
|
21 |
14 |
if (scalar @{$self->constraints;} == 1) |
|
196
|
2 |
36 |
if &first(sub {
$constraint->comparator eq $_;
}
, "=", "<=", ">=") and $version_class->new($version) == $version_class->new($constraint->version) |
|
203
|
2 |
34 |
if $constraint->comparator eq "!=" and $version_class->new($version) == $version_class->new($constraint->version) |
|
211
|
12 |
22 |
if &first(sub {
$constraint->comparator eq $_;
}
, "=", "!=") |
|
212
|
22 |
12 |
unless &first(sub {
$constraint->comparator eq $_;
}
, "=", "!=") |
|
216
|
0 |
10 |
unless @second |
|
218
|
2 |
8 |
if (scalar @second == 1) |
|
243
|
8 |
0 |
if ($is_first_iteration) |
|
246
|
0 |
8 |
if &first(sub {
$current_constraint->comparator eq $_;
}
, "<=", "<") and $version_class->new($version) < $version_class->new($current_constraint->version) |
|
258
|
3 |
5 |
if (&first(sub {
$current_constraint->comparator eq $_;
}
, '>', '>=') and &first(sub {
$next_constraint->comparator eq $_;
}
, '<', '<=') and $version_class->new($version) > $version_class->new($current_constraint->version) and $version_class->new($version) < $version_class->new($next_constraint->version)) { } |
|
|
1 |
8 |
elsif (&first(sub {
$current_constraint->comparator eq $_;
}
, '<', '<=') and &first(sub {
$next_constraint->comparator;
}
, '>', '>=')) { } |
|
282
|
0 |
5 |
if &first(sub {
$next_constraint->comparator eq $_;
}
, ">", ">=") and $version_class->new($version) > $version_class->new($next_constraint->version) |
|
300
|
8 |
8 |
if $_[$i + 1] |