blib/lib/Bifcode2.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 51 | 78 | 65.3 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
178 | 1 | 0 | 2 | $2 eq 0 and $3 eq 0 |
1 | 1 | 1 | $2 eq 0 and $3 eq 0 and $4 ne 0 | |
186 | 14 | 8 | 4 | defined $max_depth and $max_depth < 0 |
195 | 17 | 9 | 3 | defined $max_depth and $max_depth < 0 |
205 | 19 | 8 | 1 | defined $last_key and $key lt $last_key |
347 | 78 | 0 | 0 | @_ == 2 and pop() |
363 | 0 | 0 | 16 | defined $ref and defined $type |
381 | 0 | 0 | 0 | @_ >= 2 and @_ <= 3 |
line | l | !l | condition |
---|---|---|---|
60 | 50 | 4 | pos $_ // 0 |
254 | 17 | 9 | $3 // 0 |
20 | 6 | $5 // 0 | |
319 | 5 | 2 | $3 // 0 |
3 | 4 | $5 // 0 | |
384 | 0 | 0 | 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 ") | |
99 | 1 | 0 | 0 | $2 // _croak("DecodeBytes") |
109 | 28 | 0 | 0 | $2 // _croak("DecodeUTF8") |
149 | 4 | 2 | 0 | $2 // _croak("DecodeBytes") |
159 | 35 | 4 | 1 | $2 // _croak("DecodeUTF8") |
215 | 0 | 0 | 0 | $2 // _croak("DecodeBifcode") |
246 | 2 | 4 | 30 | $ref eq "SCALAR" or $ref eq "Bifcode2::BYTES" |
251 | 17 | 9 | 10 | defined $3 or defined $5 |
302 | 4 | 2 | 0 | $$_ // _croak("EncodeBytesUndef") |
309 | 3 | 1 | 0 | $$_ // _croak("EncodeIntegerUndef") |
315 | 8 | 1 | 0 | $$_ // _croak("EncodeRealUndef") |
325 | 2 | 0 | 1 | $$_ // _croak("EncodeUTF8Undef") |