line |
true |
false |
branch |
25
|
29 |
5 |
if ((caller)[0] eq 'Sort::Fields') { } |
30
|
1 |
33 |
unless (@_) |
35
|
4 |
29 |
if (ref $_[0]) { } |
40
|
4 |
29 |
unless (ref($cols = shift()) eq 'ARRAY') |
47
|
9 |
20 |
if (@$cols and $$cols[0] eq '-') |
51
|
4 |
25 |
unless (@$cols) |
55
|
4 |
26 |
unless (/^-?\d+n?$/) |
58
|
7 |
19 |
/^-/ ? : |
59
|
15 |
11 |
/n$/ ? : |
61
|
2 |
24 |
if ($col == 0) |
66
|
24 |
0 |
if $maxcol < $col[-1] |
67
|
6 |
18 |
if ($stable) { } |
79
|
4 |
17 |
if ($@) |
84
|
0 |
17 |
if ($@) |
89
|
4 |
13 |
if ($stable) { } |
116
|
0 |
17 |
if ($@) |
123
|
1 |
4 |
unless (@_) |
126
|
2 |
2 |
if (ref $_[0] eq 'ARRAY') { } |
|
1 |
2 |
elsif (@_ > 1 and ref $_[1] eq 'ARRAY') { } |
135
|
1 |
18 |
unless (@_) |
139
|
16 |
2 |
if (ref $_[0]) { } |
149
|
1 |
7 |
unless (@_) |
153
|
5 |
2 |
if (ref $_[0] eq 'ARRAY') { } |
|
1 |
2 |
elsif (@_ > 1 and ref $_[1] eq 'ARRAY') { } |