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