| line |
true |
false |
branch |
|
96
|
3 |
1 |
if (&looks_like_number($hi)) { } |
|
|
1 |
0 |
elsif ($lo eq $hi) { } |
|
97
|
1 |
2 |
if $hi == "Inf" |
|
99
|
1 |
1 |
if &looks_like_number($lo) and $lo == $hi |
|
111
|
39 |
0 |
if ($content =~ / \A [{] ( .*? ) [}] \z /msx) |
|
116
|
7 |
71 |
unless defined $_ |
|
120
|
15 |
24 |
unless defined $lo and "" ne $lo |
|
123
|
26 |
13 |
if defined $hi and "" ne $hi |
|
126
|
6 |
7 |
if $quant =~ / , \z /msx |
|
144
|
10 |
60 |
unless &looks_like_number($_) |
|
147
|
35 |
0 |
defined $my_min ? : |
|
|
35 |
0 |
if defined $raw_min |
|
149
|
25 |
10 |
defined $my_max ? : |
|
|
35 |
0 |
if defined $raw_max |
|
171
|
2 |
27 |
if ($self->__in_look_behind) |
|
172
|
2 |
0 |
if ($content =~ / \A [{] ( .*? ) [}] \z /msx) |
|
175
|
1 |
1 |
if $quant =~ / , \z /msx |
|
180
|
0 |
1 |
unless defined $hi |
|
185
|
2 |
0 |
if (/ \A [0-9]+ \z /msx) { } |
|
186
|
0 |
2 |
if $_ >= 256 |
|
193
|
1 |
0 |
if ($numeric and $lo != $hi) |
|
195
|
1 |
0 |
if (my $finish = $self->finish) |
|
199
|
1 |
0 |
if $finish->perl_version_introduced lt "5.029009" |
|
207
|
6 |
22 |
if $content =~ / \s /msx or $content =~ / \A \{ , /msx |