blib/lib/Sort/MultipleFields.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 17 | 20 | 85.0 |
line | true | false | branch |
---|---|---|---|
123 | 21 | 3 | if reftype($records[0]) eq 'ARRAY' |
124 | 0 | 24 | if grep {reftype $_ ne 'HASH';} @records |
129 | 13 | 11 | wantarray ? : |
165 | 0 | 37 | unless defined $spec |
167 | 33 | 4 | unless (ref $spec) |
172 | 3 | 0 | $spec =~ /^numdesc(ending)?$/i ? : |
3 | 3 | $spec =~ /^numasc(ending)?$/i ? : | |
9 | 6 | $spec =~ /^desc(ending)?$/i ? : | |
18 | 15 | $spec =~ /^asc(ending)?$/i ? : | |
176 | 2952 | 1951 | unless &$spec($_[0]{$field}, $_[1]{$field}) |