Branch Coverage

blib/lib/Sort/Fields.pm
Criterion Covered Total %
branch 45 48 93.7


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') { }