blib/lib/Bifcode2.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 51 | 78 | 65.3 |
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 | 68 | 0 | 0 | @_ == 2 and pop() |
337 | 0 | 0 | 16 | defined $ref and defined $type |
355 | 0 | 0 | 0 | @_ >= 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 | 0 | shift() || {'STYLE', 'Unified'} |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
21 | 70 | 0 | 0 | shift() // Carp::croak("usage: _croak(\$TYPE, [\$msg])") |
56 | 12 | 58 | 0 | shift() // $messages{$type} |
58 | 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 "Bifcode2::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") |