blib/lib/Sort/Maker.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 28 | 42 | 66.6 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
184 | 1 | 241 | 0 | @_ and $_[0] eq '1' |
194 | 82 | 112 | 0 | @_ and $_[0] eq '1' |
291 | 0 | 218 | 49 | !$$key{'ascending'} && $$opts{'descending'} |
296 | 0 | 258 | 9 | !$$key{'case'} && $$opts{'no_case'} |
477 | 31 | 23 | 0 | $$key{'type'} eq 'string' and $$key{'no_case'} |
536 | 30 | 22 | 0 | $$key{'type'} eq 'string' and $$key{'no_case'} |
597 | 34 | 26 | 0 | $$key{'type'} eq 'string' and $$key{'no_case'} |
line | l | !l | condition |
---|---|---|---|
143 | 228 | 5 | $sorter or '' |
283 | 4 | 233 | $$opts{'init_code'} ||= '' |
883 | 0 | 0 | shift() or '' |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
214 | 52 | 85 | 136 | not defined $key_desc or $is_arg{$key_desc} |
291 | 0 | 49 | 218 | $$key{'descending'} ||= !$$key{'ascending'} && $$opts{'descending'} |
296 | 0 | 9 | 258 | $$key{'no_case'} ||= !$$key{'case'} && $$opts{'no_case'} |
361 | 16 | 0 | 16 | $$opts{'closure'} or $$key{'closure'} |
386 | 0 | 16 | 0 | $deparser ||= 'B::Deparse'->new('-p', '-sC') |