| line |
true |
false |
branch |
|
117
|
193 |
0 |
if (exists $ConstructAllowed{$lc}) |
|
162
|
119 |
430 |
if @_ |
|
179
|
123 |
455 |
if @_ |
|
198
|
46 |
173 |
if @_ |
|
218
|
49 |
156 |
if @_ |
|
238
|
1 |
27 |
if (@_) |
|
240
|
1 |
0 |
if ($$self{'PosDef'} and not defined $self->min) |
|
261
|
2 |
1 |
if (@_) |
|
266
|
1 |
2 |
wantarray ? : |
|
287
|
0 |
0 |
if (@_) |
|
289
|
0 |
0 |
if exists $args{'min'} |
|
290
|
0 |
0 |
if exists $args{'max'} |
|
295
|
0 |
0 |
if defined $self->min |
|
296
|
0 |
0 |
if defined $self->max |
|
298
|
0 |
0 |
wantarray ? : |
|
314
|
3 |
2 |
unless (defined $self->min and defined $self->max) |
|
342
|
3 |
6 |
$self->inc_min ? : |
|
343
|
2 |
7 |
$self->inc_max ? : |
|
345
|
9 |
0 |
if (defined $min and defined $max) { } |
|
|
0 |
0 |
elsif (defined $min) { } |
|
|
0 |
0 |
elsif (defined $max) { } |
|
349
|
3 |
6 |
$self->inc_min ? : |
|
350
|
2 |
7 |
$self->inc_max ? : |
|
352
|
4 |
5 |
if ($min == $max) { } |
|
|
1 |
4 |
elsif ($max < $min) { } |
|
354
|
3 |
1 |
if ($self->inc_min or $self->inc_max) { } |
|
364
|
2 |
2 |
if ($min <= 0 and $self->pos_def) { } |
|
393
|
88 |
48 |
if (defined $min and defined $max) |
|
394
|
22 |
66 |
if $min > $max |
|
410
|
52 |
40 |
if (defined $min and defined $max) { } |
|
430
|
0 |
9 |
unless defined $comparison |
|
431
|
0 |
9 |
unless UNIVERSAL::isa($comparison, 'Number::Interval') |
|
437
|
9 |
6 |
if (defined $comparison->$m) { } |
|
438
|
0 |
9 |
unless defined $self->$m |
|
439
|
1 |
8 |
if $comparison->$m != $self->$m |
|
441
|
1 |
5 |
if defined $self->$m |
|
448
|
2 |
11 |
if $self->$incm and not $comparison->$incm or not $self->$incm and $comparison->$incm |
|
491
|
0 |
4 |
unless defined $max or defined $min |
|
495
|
6 |
36 |
if ($self->isinverted) { } |
|
497
|
6 |
0 |
if (defined $max and defined $min) { } |
|
498
|
0 |
6 |
if ($self->inc_max and $self->inc_min) { } |
|
|
0 |
6 |
elsif ($self->inc_max) { } |
|
|
0 |
6 |
elsif ($self->inc_min) { } |
|
499
|
0 |
0 |
if ($value <= $max or $value >= $min) |
|
503
|
0 |
0 |
if ($value <= $max or $value > $min) |
|
507
|
0 |
0 |
if ($value < $max or $value >= $min) |
|
511
|
4 |
2 |
if ($value < $max or $value > $min) |
|
522
|
28 |
8 |
if (defined $max and defined $min) { } |
|
|
4 |
4 |
elsif (defined $max) { } |
|
|
4 |
0 |
elsif (defined $min) { } |
|
523
|
5 |
23 |
if ($max == $min) { } |
|
|
2 |
21 |
elsif ($self->pos_def and $value < 0) { } |
|
|
2 |
19 |
elsif ($self->inc_max and $self->inc_min) { } |
|
|
2 |
17 |
elsif ($self->inc_max) { } |
|
|
6 |
11 |
elsif ($self->inc_min) { } |
|
524
|
4 |
1 |
if ($self->inc_min or $self->inc_max) |
|
525
|
3 |
1 |
if $value == $max |
|
530
|
2 |
0 |
if ($value <= $max and $value >= $min) |
|
534
|
1 |
1 |
if ($value <= $max and $value > $min) |
|
538
|
3 |
3 |
if ($value < $max and $value >= $min) |
|
542
|
5 |
6 |
if ($value < $max and $value > $min) |
|
547
|
1 |
3 |
if ($self->inc_max) { } |
|
548
|
1 |
0 |
if $value <= $max |
|
550
|
1 |
2 |
if $value < $max |
|
553
|
1 |
3 |
if ($self->inc_min) { } |
|
554
|
1 |
0 |
if $value >= $min |
|
556
|
1 |
2 |
if $value > $min |
|
597
|
0 |
46 |
unless defined $int2 |
|
598
|
0 |
46 |
unless UNIVERSAL::isa($int2, 'Number::Interval') |
|
624
|
37 |
9 |
if ($bound) { } |
|
627
|
14 |
23 |
if ($inverted) { } |
|
631
|
1 |
13 |
if ($inverted1 and $inverted2) { } |
|
635
|
1 |
0 |
$min1 > $min2 ? : |
|
636
|
0 |
1 |
$max1 < $max2 ? : |
|
642
|
0 |
13 |
if ($inverted2) { } |
|
652
|
6 |
7 |
if ($nowbound) { } |
|
656
|
3 |
3 |
if ($min2 < $max1) { } |
|
|
2 |
1 |
elsif ($min2 < $min1) { } |
|
|
1 |
0 |
elsif ($min2 > $min1) { } |
|
660
|
1 |
2 |
if $max2 > $min1 |
|
663
|
1 |
1 |
$max1 < $max2 ? : |
|
670
|
1 |
1 |
if ($max2 >= $min1) |
|
690
|
3 |
4 |
if (defined $max2) { } |
|
|
3 |
1 |
elsif (defined $min2) { } |
|
694
|
1 |
2 |
if ($max2 > $min1) { } |
|
|
1 |
1 |
elsif ($max2 > $max1) { } |
|
711
|
1 |
2 |
if ($min2 < $max1) { } |
|
|
1 |
1 |
elsif ($min2 < $min1) { } |
|
738
|
8 |
15 |
if ($bound1 and $bound2) { } |
|
741
|
0 |
8 |
$min1 > $min2 ? : |
|
742
|
6 |
2 |
$max1 < $max2 ? : |
|
745
|
1 |
7 |
if ($outmax < $outmin) |
|
755
|
6 |
9 |
if ($bound2) |
|
762
|
8 |
7 |
if (defined $max2) { } |
|
|
5 |
2 |
elsif (defined $min2) { } |
|
763
|
2 |
6 |
if ($max2 <= $max1 and $max2 >= $min1) { } |
|
|
0 |
6 |
elsif ($max2 <= $min1) { } |
|
|
6 |
0 |
elsif ($max2 >= $max1) { } |
|
779
|
3 |
2 |
if ($min2 <= $max1 and $min2 >= $min1) { } |
|
|
1 |
1 |
elsif ($min2 >= $max1) { } |
|
|
1 |
0 |
elsif ($min2 <= $min1) { } |
|
813
|
1 |
8 |
if (defined $max1 and defined $max2) { } |
|
|
1 |
7 |
elsif (defined $min2 and defined $min1) { } |
|
814
|
1 |
0 |
$max1 < $max2 ? : |
|
816
|
0 |
1 |
$min1 > $min2 ? : |
|
819
|
3 |
4 |
defined $max1 ? : |
|
820
|
2 |
5 |
defined $min1 ? : |
|
822
|
1 |
6 |
if (not defined $refmax || defined $refmin) { } |
|
|
1 |
5 |
elsif (not defined $refmax) { } |
|
|
1 |
4 |
elsif (not defined $refmin) { } |
|
|
2 |
2 |
elsif ($refmax > $refmin) { } |
|
846
|
37 |
5 |
if (defined $outmax or defined $outmin) { } |
|
855
|
4 |
29 |
if (defined $outmax and defined $outmin and $outmax == $outmin and not $inc_max && $inc_min) |
|
883
|
70 |
4 |
if (defined $newval) |
|
884
|
4 |
66 |
if (defined $ref1 and $ref1 == $newval and defined $ref2 and $ref2 == $newval) { } |
|
|
23 |
68 |
elsif (defined $ref2 and $ref2 == $newval) { } |
|
888
|
4 |
0 |
unless $inc1 and $inc2 |
|
900
|
0 |
0 |
defined $min1 ? : |
|
|
0 |
0 |
defined $max1 ? : |
|
|
0 |
0 |
defined $min2 ? : |
|
|
0 |
0 |
defined $max2 ? : |