| line |
true |
false |
branch |
|
36
|
56 |
437 |
if (defined $sort_field)
|
|
37
|
20 |
36 |
if ($sort_field =~ s/_reversed$//) { }
|
|
45
|
265 |
228 |
if ($sigil eq "\$")
|
|
46
|
66 |
199 |
if (defined $item and !$self->{'cache'}{'item'} || $self->{'cache'}{'item'} ne $item) { }
|
|
56
|
411 |
82 |
unless (exists $cache{$data_field})
|
|
68
|
265 |
228 |
if $sigil eq "\$"
|
|
79
|
157 |
550 |
if (@data == 0) { }
|
|
|
549 |
1 |
elsif (@data == 1) { }
|
|
|
1 |
0 |
elsif (@data % 2 == 0) { }
|
|
113
|
54 |
105 |
if ($sort_reverse) { }
|
|
131
|
302 |
110 |
if (@keys == 1)
|
|
133
|
125 |
177 |
if (ref $data->{$key} eq "ARRAY")
|
|
148
|
2 |
140 |
unless $self->can($formatter)
|
|
156
|
218 |
0 |
if (exists $data{$sort_field}) { }
|
|
174
|
0 |
30 |
unless $loop
|
|
178
|
30 |
30 |
if ($loop->[$i] eq $item)
|
|
185
|
6 |
24 |
if $index < 1 or $index > @$loop
|
|
186
|
24 |
6 |
$index ? :
|
|
196
|
43 |
786 |
unless $sorted_data->{$name}
|
|
199
|
200 |
586 |
if ($self->can($formatter))
|
|
200
|
0 |
200 |
if (ref $sorted_data->{$name} eq 'ARRAY') { }
|
|
|
0 |
200 |
elsif (ref $sorted_data->{$name} eq 'HASH') { }
|
|
236
|
548 |
156 |
if ($self->can($method)) { }
|
|
252
|
0 |
3 |
unless $loop
|
|
255
|
3 |
3 |
if ($loop->[$i] eq $item)
|
|
270
|
0 |
3 |
unless $loop
|
|
271
|
1 |
2 |
$loop->[0] eq $item ? :
|
|
280
|
0 |
3 |
unless $loop
|
|
281
|
1 |
2 |
$loop->[-1] eq $item ? :
|
|
290
|
0 |
1 |
unless $loop
|
|
351
|
1 |
2 |
if @merged_list == $self->{'list_length'}
|
|
352
|
2 |
0 |
if (&$comparer($list1->[0], $list2->[0]) > 0) { }
|
|
360
|
1 |
0 |
if @merged_list == $self->{'list_length'}
|
|
365
|
3 |
17 |
if @merged_list == $self->{'list_length'}
|
|
379
|
17 |
479 |
unless defined $value
|
|
381
|
268 |
228 |
if ($sigil eq '$') { }
|
|
|
44 |
184 |
elsif ($sigil eq '@') { }
|
|
|
184 |
0 |
elsif ($sigil eq '') { }
|
|
382
|
267 |
1 |
if (ref $value ne 'SCALAR') { }
|
|
396
|
83 |
101 |
ref $value ? :
|
|
400
|
0 |
496 |
unless $check
|
|
422
|
125 |
287 |
if ($data_field) { }
|
|
453
|
89 |
53 |
unless defined $sort_field
|
|
454
|
90 |
52 |
unless defined $sort_reverse
|