line |
true |
false |
branch |
24
|
29 |
5 |
if ((caller)[0] eq 'Sort::Fields') { } |
29
|
1 |
33 |
unless (@_) |
34
|
4 |
29 |
if (ref $_[0]) { } |
39
|
4 |
29 |
unless (ref($cols = shift()) eq 'ARRAY') |
46
|
9 |
20 |
if (@$cols and $cols->[0] eq '-') |
50
|
4 |
25 |
unless (@$cols) |
54
|
4 |
26 |
unless (/^-?\d+n?$/) |
57
|
7 |
19 |
/^-/ ? : |
58
|
15 |
11 |
/n$/ ? : |
60
|
2 |
24 |
if ($col == 0) |
65
|
24 |
0 |
if $maxcol < $col[-1] |
66
|
6 |
18 |
if ($stable) { } |
78
|
4 |
17 |
if ($@) |
83
|
0 |
17 |
if ($@) |
88
|
4 |
13 |
if ($stable) { } |
115
|
0 |
17 |
if ($@) |
122
|
1 |
4 |
unless (@_) |
125
|
2 |
2 |
if (ref $_[0] eq 'ARRAY') { } |
|
1 |
2 |
elsif (@_ > 1 and ref $_[1] eq 'ARRAY') { } |
134
|
1 |
18 |
unless (@_) |
138
|
16 |
2 |
if (ref $_[0]) { } |
148
|
1 |
7 |
unless (@_) |
152
|
5 |
2 |
if (ref $_[0] eq 'ARRAY') { } |
|
1 |
2 |
elsif (@_ > 1 and ref $_[1] eq 'ARRAY') { } |