| line |
true |
false |
branch |
|
41
|
3 |
6 |
if (not defined $run) { } |
|
45
|
1 |
5 |
if ($run->[1] == $num) { } |
|
|
2 |
3 |
elsif ($run->[1] == $num - 1) { } |
|
69
|
1 |
66124 |
if grep {/^0[0-9]/u;} split(m[[/.]]u, $ip, 0) |
|
92
|
0 |
66146 |
unless $Range::Merge::a->[0] <=> $Range::Merge::b->[0] |
|
107
|
15 |
66123 |
unless (defined $last) |
|
111
|
66108 |
15 |
if ($last->[1] == $range->[0] - 1 and scalar @$last == scalar @$range) { } |
|
114
|
5 |
1 |
if ($last->[$i] ne $range->[$i]) |
|
119
|
5 |
66103 |
if ($nomatch) { } |
|
130
|
15 |
0 |
if (defined $last) |
|
137
|
0 |
15 |
if scalar @$ranges == 0 |
|
145
|
15 |
0 |
if (scalar @$stack) |
|
153
|
15 |
66121 |
unless (scalar @$stack) |
|
168
|
66125 |
3 |
if $_->[0] <= $range->[1] |
|
178
|
66113 |
8 |
unless (scalar @mid) |
|
190
|
6 |
2 |
if ($left[0] < $range->[0]) |
|
192
|
6 |
0 |
if ($left[0] <= $left[1]) |
|
202
|
4 |
4 |
if ($right[1] > $range->[1]) |
|
204
|
4 |
0 |
if ($right[0] <= $right[1]) |