blib/lib/Bifcode.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 55 | 78 | 70.5 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
163 | 1 | 0 | 2 | $2 eq '0' and $3 eq '0' |
1 | 1 | 1 | $2 eq '0' and $3 eq '0' and $4 ne '0' | |
171 | 14 | 8 | 4 | defined $max_depth and $max_depth < 0 |
180 | 17 | 9 | 3 | defined $max_depth and $max_depth < 0 |
190 | 19 | 8 | 1 | defined $last_key and $key lt $last_key |
321 | 69 | 0 | 0 | @_ == 2 and pop() |
337 | 0 | 0 | 16 | defined $ref and defined $type |
355 | 1 | 1 | 62 | @_ >= 2 and @_ <= 3 |
line | l | !l | condition |
---|---|---|---|
60 | 50 | 1 | pos $_ // 0 |
239 | 16 | 9 | $3 // 0 |
20 | 5 | $5 // 0 | |
304 | 5 | 2 | $3 // 0 |
3 | 4 | $5 // 0 | |
358 | 0 | 62 | shift() || {'STYLE', 'Unified'} |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
21 | 73 | 0 | 0 | shift() // Carp::croak('usage: _croak($TYPE, [$msg])') |
56 | 12 | 61 | 0 | shift() // $messages{$type} |
61 | 0 | 0 | (shift() // $messages{$type}) // Carp::croak("Bifcode::_croak($type) has no message ") | |
96 | 1 | 0 | 0 | $2 // _croak('DecodeBytes') |
106 | 28 | 0 | 0 | $2 // _croak('DecodeUTF8') |
134 | 4 | 2 | 0 | $2 // _croak('DecodeBytes') |
144 | 35 | 4 | 1 | $2 // _croak('DecodeUTF8') |
200 | 0 | 0 | 0 | $2 // _croak('DecodeBifcode') |
231 | 2 | 4 | 21 | $ref eq 'SCALAR' or $ref eq 'Bifcode::BYTES' |
236 | 16 | 9 | 10 | defined $3 or defined $5 |
287 | 4 | 2 | 0 | $$_ // _croak('EncodeBytesUndef') |
294 | 3 | 1 | 0 | $$_ // _croak('EncodeIntegerUndef') |
300 | 8 | 1 | 0 | $$_ // _croak('EncodeRealUndef') |
310 | 2 | 0 | 1 | $$_ // _croak('EncodeUTF8Undef') |