| lib/Encoding/BER.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 48 | 86 | 55.8 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 390 | 1 | 0 | 114 | $defp and defined $leng |
| 457 | 23 | 0 | 21 | ref $val and $val->can('as_hex') |
| 483 | 4 | 6 | 26 | $val >= -128 and $val < 128 |
| 502 | 6 | 0 | 6 | ref $val and $val->can('bcmp') |
| 589 | 3 | 1 | 29 | $exp >= -128 and $exp < 128 |
| 748 | 0 | 0 | 157 | $AKATAG{$name} and $ALLTAG{$AKATAG{$name}} |
| 827 | 113 | 0 | 0 | $rclass and $rclass ne $class |
| 887 | 154 | 0 | 21 | ref $d and UNIVERSAL::isa($d, 'Math::BigInt') |
| 928 | 0 | 0 | 10 | $val and defined $$val{'type'} |
| 1278 | 27 | 0 | 0 | defined &Math::BigInt::new and length $data > 4 |
| 1282 | 0 | 0 | 0 | $sgnd and $sign |
| line | l | !l | condition |
|---|---|---|---|
| 353 | 22 | 93 | $levl || 0 |
| 372 | 1 | 4 | $levl || 0 |
| 784 | 0 | 115 | $func ||= 'e' |
| 793 | 2 | 0 | $class ||= 'universal' |
| 794 | 2 | 0 | $type ||= 'primitive' |
| 821 | 14 | 99 | $class ||= 'universal' |
| 822 | 18 | 95 | $rtype || $type || 'primitive' |
| 954 | 33 | 1 | $datlen || 0 |
| 1022 | 32 | 0 | $decfnc ||= \&decode_unknown |
| 1093 | 34 | 0 | $more || $tval & 31 || 0 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 354 | 11 | 55 | 49 | $$me{'acanonical'} or not $me->behaves_like_a_hash($data) |
| 361 | 0 | 115 | 0 | $me->rule_check_and_apply($data) || $data |
| 457 | 21 | 1 | 22 | ref $val and $val->can('as_hex') or length $val > 8 |
| 502 | 6 | 0 | 6 | ref $val and $val->can('bcmp') or length $val > 8 |
| 568 | 0 | 29 | 0 | $$data{'flavor'} or $$me{'flavor'} |
| 838 | 0 | 15 | 0 | $encf ||= $$th{$func} |
| 855 | 0 | 1 | 4 | $$data{'flavor'} || $$me{'flavor'} |
| 1016 | 32 | 0 | 0 | $typval or $typmore |
| 1027 | 0 | 0 | 0 | &$pretty($me, $val) || $val |
| 1037 | 0 | 0 | 0 | &$c($me, $result) || $result |
| 1117 | 0 | 0 | 34 | $tp ||= $$th{'pretty'} |