| blib/lib/Data/ParseBinary.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 24 | 33 | 72.7 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 115 | 0 | 10 | 30 | $count and ref $count |
| 10 | 0 | 30 | $count and ref $count and UNIVERSAL::isa($count, 'CODE') | |
| 162 | 0 | 46 | 14 | $len and ref $len |
| 46 | 0 | 14 | $len and ref $len and UNIVERSAL::isa($len, 'CODE') | |
| 184 | 4 | 0 | 4 | $ch ge "\330" && $ch le "\333" |
| line | l | !l | condition |
|---|---|---|---|
| 193 | 22 | 4 | scalar grep({$ch ge $_;} "\300", "\340", "\360") || 0 |
| 226 | 1 | 2 | $length_field_type ||= \&UBInt8 |
| 306 | 5 | 0 | $modulus ||= 4 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 177 | 1 | 1 | 12 | $encoding eq 'UTF-32LE' or $encoding eq 'UTF-32BE' |
| 1 | 1 | 10 | $encoding eq 'UTF-16LE' or $encoding eq 'UTF-16BE' | |
| 3 | 0 | 7 | $encoding eq 'utf8' or $encoding eq 'UTF-8' | |
| 255 | 0 | 11 | 0 | $char_field ||= Char($name, $encoding) |