| line |
true |
false |
branch |
|
18
|
1 |
1 |
$_[1] > $_[0] ? : |
|
|
1 |
2 |
$_[0] > $_[1] ? : |
|
25
|
2 |
0 |
if not $u{$$_{$_[1]}} and do {
$u{$$_{$_[1]}} = 1
} |
|
35
|
0 |
34 |
$_[0][1] ? : |
|
36
|
22 |
12 |
if not $s or $s == 1 |
|
40
|
0 |
17 |
$_[1] - $_[0] == 1 ? : |
|
46
|
0 |
0 |
if ($_[1]{'isPadded'}) |
|
48
|
0 |
0 |
$d == 0 ? : |
|
|
0 |
0 |
!$d ? : |
|
53
|
17 |
0 |
$_[0] < $_[1] ? : |
|
56
|
17 |
0 |
$_[0] < $_[1] ? : |
|
83
|
2 |
32 |
if $s == $st |
|
92
|
17 |
45 |
$n->[0] != 0 || $n->[1] != 9 ? : |
|
|
32 |
62 |
$n->[0] == $n->[1] ? : |
|
94
|
27 |
5 |
if $d |
|
103
|
0 |
34 |
if (not $tok->{'isPadded'} and $p and $p->{'pattern'} eq $o->{'pattern'}) |
|
104
|
0 |
0 |
if scalar @{$p->{'digits'};} > 1 |
|
110
|
0 |
34 |
if $tok->{'isPadded'} |
|
123
|
26 |
0 |
if (not $i || $helper{'contains'}->($c, 'string', $e)) { } |
|
|
0 |
0 |
elsif ($i and $helper{'contains'}->($c, 'string', $e)) { } |
|
147
|
8 |
20 |
if (ref $_[0] || '') eq 'Regex::Range::Number' |
|
150
|
5 |
23 |
if (ref $start eq 'ARRAY') |
|
151
|
1 |
4 |
unless ref $max eq 'HASH' |
|
154
|
3 |
2 |
$max->{'capture'} ? : |
|
157
|
6 |
9 |
$max->{'individual'} ? : |
|
162
|
0 |
23 |
unless defined $max or $start == $max |
|
168
|
6 |
17 |
if $cache{$key} |
|
172
|
8 |
9 |
if ($b - $a == 1) |
|
174
|
4 |
4 |
if $options->{'capture'} |
|
184
|
0 |
9 |
$helper{'padding'}->($a) || $helper{'padding'}->($b) ? : |
|
190
|
0 |
9 |
if ($a < 0) |
|
191
|
0 |
0 |
$b < 0 ? : |
|
196
|
9 |
0 |
if $b >= 0 |
|
198
|
4 |
5 |
if $capture |