blib/lib/Sort/BySpec.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 12 | 15 | 80.0 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
111 | 165 | 124 | 22 | $which == 0 and $val eq $spec_elem |
116 | 0 | 9 | 29 | $j < $#{$spec;} and ref $$spec[$j + 1] eq 'CODE' |
119 | 22 | 7 | 9 | $which == 1 and $val =~ /$spec_elem/ |
125 | 0 | 0 | 39 | $j < $#{$spec;} and ref $$spec[$j + 1] eq 'CODE' |
128 | 29 | 3 | 7 | $which == 2 and &$spec_elem($val) |