line |
true |
false |
branch |
14
|
5 |
0 |
ref $_[0] eq 'HASH' ? : |
29
|
0 |
5 |
unless (ref $self eq 'Sort::ArrayOfArrays') |
38
|
0 |
5 |
unless $$self{'results'} |
39
|
0 |
5 |
unless ref $$self{'results'} eq 'ARRAY' and $$self{'results'}[0] and ref $$self{'results'}[0] eq 'ARRAY' |
40
|
0 |
5 |
if ($$self{'header_row'}) |
58
|
0 |
5 |
if ($$self{'header_row'}) |
68
|
0 |
5 |
if $$self{'sort_code_text'} |
74
|
7 |
0 |
if ($$self{'sort_code'} and ref $$self{'sort_code'}) |
75
|
0 |
7 |
if (ref $$self{'sort_code'} eq 'HASH' and $$self{'sort_code'}{$col}) { } |
|
0 |
7 |
elsif (ref $$self{'sort_code'} eq 'ARRAY' and $$self{'sort_code'}[$col]) { } |
76
|
0 |
0 |
if (ref $$self{'sort_code'}{$col}) |
77
|
0 |
0 |
unless ref $$self{'sort_code'}{$col} eq 'CODE' |
82
|
0 |
0 |
if (ref $$self{'sort_code'}[$col]) |
83
|
0 |
0 |
unless ref $$self{'sort_code'}[$col] eq 'CODE' |
96
|
7 |
0 |
if ($$self{'sort_code'} and ref $$self{'sort_code'}) |
97
|
0 |
7 |
if (ref $$self{'sort_code'} eq 'HASH' and $$self{'sort_code'}{$this_sort_column}) { } |
|
0 |
7 |
elsif (ref $$self{'sort_code'} eq 'ARRAY' and $$self{'sort_code'}[$this_sort_column]) { } |
105
|
7 |
0 |
unless ($this_sort_method) |
108
|
6 |
1 |
if ($$self{'results'}[$i][$this_sort_column] =~ /[^0-9.\-+ ]/) { } |
|
1 |
0 |
elsif ($$self{'results'}[$i][$this_sort_column] =~ /^[0-9.\-+]+$/) { } |
111
|
0 |
1 |
if $$self{'results'}[$i][$this_sort_column] =~ /^\.+$/ |
118
|
5 |
2 |
if ($total_sorts == $this_sort) |
119
|
4 |
1 |
if ($this_toggle and $this_sort_method =~ /^.a$/) { } |
|
0 |
2 |
elsif ($this_toggle and $this_sort_method =~ /^.d$/) { } |
127
|
0 |
7 |
if ($this_sort_method =~ s/^l(.)$/r$1/i) |
128
|
0 |
0 |
unless exists $$self{'sort_method_regex'}{$this_sort_column} |
134
|
6 |
1 |
if ($this_sort_method =~ /^a.$/i) { } |
|
1 |
0 |
elsif ($this_sort_method =~ /^n.$/i) { } |
|
0 |
0 |
elsif ($this_sort_method =~ /^t.$/i) { } |
|
0 |
0 |
elsif ($this_sort_method =~ /^r.$/i) { } |
141
|
0 |
0 |
unless $$self{'sort_method_regex'}{$this_sort_column} |
148
|
0 |
0 |
if ($$self{'sort_code'}[$this_sort_column] =~ /^.d$/i) { } |
158
|
3 |
4 |
if (not $special_sort_method and $this_sort_method =~ /^.a$/i) { } |
|
4 |
0 |
elsif ($this_sort_method =~ /^.d$/i) { } |
170
|
0 |
5 |
if $$self{'sort_code_ref'} and ref $$self{'sort_code_ref'} eq 'CODE' |
173
|
0 |
5 |
if ($@) |