line |
true |
false |
branch |
112
|
3 |
10 |
if (not ref $self->_source) { } |
|
9 |
1 |
elsif (ref $self->_source eq ref \'') { } |
|
1 |
0 |
elsif (ref $self->_source) { } |
113
|
1 |
2 |
unless open $fh, "<", $self->_source |
117
|
0 |
9 |
unless open $fh, "<", $self->_source |
154
|
0 |
9 |
unless $read == $try_to_read |
160
|
0 |
9 |
if ($self->_trailer->{'offset_size'} == 3) |
194
|
4 |
0 |
if exists $singletons{$length} |
202
|
0 |
174 |
if $power2 > 3 |
212
|
0 |
174 |
if ($power2 == 3) { } |
|
0 |
174 |
elsif ($power2 == 4) { } |
216
|
0 |
0 |
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 |
6 |
if $length > 3 |
243
|
0 |
6 |
if $length < 2 |
258
|
0 |
6 |
if $length != 3 |
325
|
40 |
0 |
$self->_object_ref_size == 1 ? : |
344
|
23 |
0 |
$self->_object_ref_size == 1 ? : |
352
|
23 |
0 |
$self->_object_ref_size == 1 ? : |
372
|
0 |
554 |
unless read($self->_fh, $buffer, 1) == 1 |
382
|
66 |
488 |
if $type ne 0 and $length == 15 |
386
|
0 |
554 |
if $@ |