Branch Coverage

blib/lib/Sort/BySpec.pm
Criterion Covered Total %
branch 33 38 86.8


line true false branch
97 311 78 if (not $ref) { }
38 40 elsif ($ref eq 'Regexp') { }
39 1 elsif ($ref eq 'CODE') { }
98 22 289 if ($which == 0 and $val eq $spec_elem)
103 29 9 if ($j < $#{$spec;} and ref $$spec[$j + 1] eq 'CODE')
106 9 29 if ($which == 1 and $val =~ /$spec_elem/)
109 23 6 if $sortsub
112 39 0 if ($j < $#{$spec;} and ref $$spec[$j + 1] eq 'CODE')
115 7 32 if ($which == 2 and &$spec_elem($val))
118 32 0 if $sortsub
130 14 0 if (@_ >= 2) { }
139 0 14 if ($xform)
147 8 6 if ($rank_a != $rank_b)
150 6 0 unless $sortsub
154 1 7 if ($args{'_return_cmp'}) { }
161 12 15 $Sort::BySpec::a->[3] ? :
27 46 unless $Sort::BySpec::a->[2] <=> $Sort::BySpec::b->[2]
164 5 36 $xform ? :
169 6 1 if ($args{'array'})