Branch Coverage

blib/lib/Sort/ArrayOfArrays.pm
Criterion Covered Total %
branch 32 72 44.4


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 ($@)