Branch Coverage

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


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