| blib/lib/Encode/Mapper.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 16 | 31 | 51.6 |
| line | l | !l | condition |
|---|---|---|---|
| 83 | 20 | 11 | $opt eq ':others' and $opt{'others'} = sub { shift(); } |
| 84 | 9 | 11 | $opt eq ':silent' and $opt{'silent'} = 1 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 40 | 0 | 0 | 1833 | defined $_[0] and $_[0] ne '' |
| 49 | 278 | 4 | 0 | ref \$_[1] ne 'SCALAR' and not UNIVERSAL::isa($_[1], 'CODE') |
| 58 | 0 | 0 | 1551 | defined $_[1][1] and length $_[1][1] < length $_[0] |
| 96 | 17 | 0 | 1 | defined $opt{'complement'} and UNIVERSAL::isa($opt{'complement'}, 'ARRAY') |
| 102 | 15 | 0 | 3 | defined $opt{'override'} and UNIVERSAL::isa($opt{'override'}, 'ARRAY') |
| 108 | 5 | 13 | 0 | defined $opt{'others'} and not $option{'silent'} |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 54 | 1547 | 4 | 0 | ref \$_[1][0] eq 'SCALAR' or UNIVERSAL::isa($_[1][0], 'CODE') |
| 501 | 0 | 0 | 0 | not UNIVERSAL::isa($encoder, 'ARRAY') or grep {not $_->isa($cls) if defined $_;} @{$encoder;} |
| 542 | 0 | 0 | 0 | not UNIVERSAL::isa($decoder, 'ARRAY') or grep {not $_->isa($cls) if defined $_;} @{$decoder;} |