| line |
true |
false |
branch |
|
53
|
77 |
181 |
if ($self->[$mid][1] < $index) { } |
|
75
|
2 |
1 |
$substr =~ /-/ ? : |
|
91
|
0 |
11 |
unless @_ == 3 or @_ == 4 |
|
94
|
0 |
11 |
unless $_[0] <= $_[1] |
|
98
|
0 |
11 |
unless not defined $_[3] or ref $_[3] eq 'CODE' |
|
107
|
4 |
7 |
$length ? : |
|
125
|
0 |
0 |
unless defined $ref |
|
139
|
32 |
0 |
unless defined $copy |
|
145
|
5 |
27 |
if ($end_range < 0 or $self->[$end_range][1] < $start_elem) |
|
147
|
1 |
3 |
defined $filler ? : |
|
|
1 |
4 |
ref $filler ? : |
|
150
|
2 |
3 |
if @arg |
|
155
|
1 |
26 |
if ($end_elem < $self->[0][0]) |
|
157
|
1 |
0 |
defined $filler ? : |
|
|
0 |
1 |
ref $filler ? : |
|
160
|
1 |
0 |
if @arg |
|
168
|
22 |
4 |
defined $self->[$end] ? : |
|
180
|
4 |
22 |
if (defined $filler and $start_offset < 0) |
|
183
|
1 |
3 |
ref $filler ? : |
|
192
|
24 |
2 |
if ($self->[$start][0] <= $end_elem) |
|
197
|
10 |
14 |
if ($self->[$start][0] < $s) |
|
206
|
7 |
17 |
if ($e < $self->[$start][1]) |
|
212
|
0 |
24 |
if defined $set |
|
217
|
6 |
20 |
if ($start + 1 <= $end - 1) |
|
223
|
4 |
4 |
if (defined $filler) |
|
227
|
2 |
2 |
if ($start_fill <= $end_fill) |
|
229
|
1 |
1 |
ref $filler ? : |
|
243
|
14 |
12 |
if ($end > $start) |
|
245
|
7 |
7 |
if (defined $filler) |
|
249
|
3 |
4 |
!defined($end_offset) || $end_offset < 0 ? : |
|
251
|
5 |
2 |
if ($start_fill <= $end_fill) |
|
253
|
1 |
4 |
ref $filler ? : |
|
260
|
6 |
8 |
if (defined $end_offset and $end_offset >= 0) |
|
267
|
4 |
2 |
if ($end_elem < $self->[$end][1]) |
|
273
|
0 |
6 |
if defined $set |
|
278
|
11 |
15 |
if (defined $filler) |
|
302
|
2 |
12 |
if not defined $bottom or $bottom < 0 |
|
303
|
6 |
8 |
if not defined $top or $top > $#$self |
|
309
|
9 |
36 |
if ($self->[$i][2] eq $$self[$i - 1][2] and $self->[$i][0] == $$self[$i - 1][1] + 1) |
|
315
|
2 |
7 |
if defined $set |
|
325
|
0 |
13 |
unless @_ == 3 or @_ == 5 |
|
328
|
0 |
13 |
unless $_[0] <= $_[1] |
|
331
|
0 |
13 |
unless not defined $_[3] or ref $_[3] eq 'CODE' |
|
342
|
6 |
7 |
$length ? : |
|
352
|
1 |
1 |
if (wantarray) { } |
|
358
|
0 |
2 |
$a + 1 == $b ? : |
|
|
1 |
2 |
$a == $b ? : |
|
376
|
8 |
44 |
if ($end_range < 0 or $self->[$end_range][1] < $start_elem) |
|
380
|
8 |
0 |
defined $value ? : |
|
385
|
2 |
42 |
if ($end_elem < $self->[0][0]) |
|
386
|
2 |
0 |
defined $value ? : |
|
395
|
35 |
7 |
defined $self->[$end] ? : |
|
406
|
15 |
27 |
if ($start_offset > 0) |
|
410
|
5 |
10 |
defined $copy ? : |
|
414
|
40 |
2 |
if defined $value |
|
417
|
11 |
24 |
if (defined $end_offset and $end_offset >= 0 and $end_elem < $self->[$end][1]) |
|
424
|
2 |
9 |
defined $copy ? : |
|
428
|
24 |
18 |
defined $end_offset && $end_offset >= 0 ? : |
|
438
|
1 |
6 |
unless $end >= 0 |
|
442
|
7 |
4 |
if ($self->[$mid][1] < $key) { } |
|
448
|
6 |
0 |
if ($self->[$start][0] <= $key and $self->[$start][1] >= $key) |
|
457
|
7 |
51 |
unless $#$self >= 0 |
|
460
|
0 |
122 |
unless @{$self->[$i];} == 3 |
|
462
|
0 |
122 |
unless $self->[$i][0] <= $self->[$i][1] |
|
464
|
71 |
51 |
if ($i > 0) |
|
465
|
0 |
71 |
unless $$self[$i - 1][1] < $self->[$i][0] |