| line |
true |
false |
branch |
|
19
|
0 |
0 |
$_[1] > $_[0] ? : |
|
|
0 |
0 |
$_[0] > $_[1] ? : |
|
26
|
0 |
0 |
if not $u{$$_{$_[1]}} and do {
$u{$$_{$_[1]}} = 1
} |
|
36
|
0 |
24 |
$_[0][1] ? : |
|
37
|
12 |
12 |
if not $s or $s == 1 |
|
41
|
0 |
12 |
$_[1] - $_[0] == 1 ? : |
|
47
|
0 |
0 |
if ($_[1]{'isPadded'}) |
|
49
|
0 |
0 |
$d == 0 ? : |
|
|
0 |
0 |
!$d ? : |
|
54
|
8 |
0 |
$_[0] < $_[1] ? : |
|
57
|
8 |
0 |
$_[0] < $_[1] ? : |
|
84
|
0 |
24 |
if $s == $st |
|
93
|
12 |
42 |
$n->[0] != 0 || $n->[1] != 9 ? : |
|
|
24 |
54 |
$n->[0] == $n->[1] ? : |
|
95
|
24 |
0 |
if $d |
|
104
|
0 |
24 |
if (not $tok->{'isPadded'} and $p and $p->{'pattern'} eq $o->{'pattern'}) |
|
105
|
0 |
0 |
if scalar @{$p->{'digits'};} > 1 |
|
111
|
0 |
24 |
if $tok->{'isPadded'} |
|
124
|
16 |
0 |
if (not $i || $helper{'contains'}->($c, 'string', $e)) { } |
|
|
0 |
0 |
elsif ($i and $helper{'contains'}->($c, 'string', $e)) { } |
|
148
|
4 |
4 |
if ref $_[0] eq 'Regex::Range::Number' |
|
151
|
0 |
8 |
unless defined $max or $start == $max |
|
156
|
0 |
8 |
if $cache{$key} |
|
160
|
4 |
4 |
if ($b - $a == 1) |
|
162
|
2 |
2 |
if $options->{'capture'} |
|
172
|
0 |
4 |
$helper{'padding'}->($a) || $helper{'padding'}->($b) ? : |
|
178
|
0 |
4 |
if ($a < 0) |
|
179
|
0 |
0 |
$b < 0 ? : |
|
184
|
4 |
0 |
if $b >= 0 |
|
187
|
2 |
2 |
if $capture |