| line |
true |
false |
branch |
|
112
|
5 |
8 |
if (not ref $self->_source) { } |
|
|
7 |
1 |
elsif (ref $self->_source eq ref \'') { } |
|
|
1 |
0 |
elsif (ref $self->_source) { } |
|
113
|
1 |
4 |
unless open $fh, "<", $self->_source |
|
117
|
0 |
7 |
unless open $fh, "<", $self->_source |
|
154
|
0 |
9 |
unless $read == $try_to_read |
|
160
|
0 |
9 |
if ($self->_trailer->{'offset_size'} == 3) |
|
192
|
2 |
0 |
if exists $singletons{$length} |
|
200
|
0 |
207 |
if $power_of_2 > 4 |
|
210
|
28 |
179 |
if ($power_of_2 == 3) { } |
|
|
0 |
179 |
elsif ($power_of_2 == 4) { } |
|
214
|
16 |
12 |
if ($b->bcmp("Math::BigInt"->new(2)->bpow(63)) >= 0) |
|
230
|
0 |
0 |
if ($b->bcmp("Math::BigInt"->new(2)->bpow(127)) >= 0) |
|
242
|
0 |
3 |
if $length > 3 |
|
243
|
0 |
3 |
if $length < 2 |
|
258
|
0 |
6 |
if $length != 3 |
|
325
|
39 |
0 |
$self->_object_ref_size == 1 ? : |
|
344
|
25 |
0 |
$self->_object_ref_size == 1 ? : |
|
352
|
25 |
0 |
$self->_object_ref_size == 1 ? : |
|
371
|
0 |
582 |
unless read($self->_fh, $buffer, 1) == 1 |
|
378
|
66 |
516 |
if $type ne 0 and $length == 15 |
|
382
|
0 |
582 |
if $@ |