| line |
true |
false |
branch |
|
114
|
3 |
10 |
if (not ref $self->_source) { } |
|
|
9 |
1 |
elsif (ref $self->_source eq ref \'') { } |
|
|
1 |
0 |
elsif (ref $self->_source) { } |
|
115
|
1 |
2 |
unless open $fh, "<", $self->_source |
|
119
|
0 |
9 |
unless open $fh, "<", $self->_source |
|
156
|
0 |
9 |
unless $read == $try_to_read |
|
162
|
0 |
9 |
if ($self->_trailer->{'offset_size'} == 3) |
|
196
|
4 |
0 |
if exists $singletons{$length} |
|
204
|
0 |
174 |
if $power2 > 3 |
|
214
|
0 |
174 |
if ($power2 == 3) { } |
|
|
0 |
174 |
elsif ($power2 == 4) { } |
|
218
|
0 |
0 |
if ($b->bcmp("Math::BigInt"->new(2)->bpow(63)) > 0) |
|
232
|
0 |
0 |
if ($b->bcmp("Math::BigInt"->new(2)->bpow(127)) > 0) |
|
244
|
0 |
6 |
if $length > 3 |
|
245
|
0 |
6 |
if $length < 2 |
|
260
|
0 |
6 |
if $length != 3 |
|
327
|
40 |
0 |
$self->_object_ref_size == 1 ? : |
|
346
|
23 |
0 |
$self->_object_ref_size == 1 ? : |
|
354
|
23 |
0 |
$self->_object_ref_size == 1 ? : |
|
371
|
0 |
554 |
if $Debug |
|
373
|
0 |
554 |
if $Debug |
|
374
|
0 |
554 |
unless read($self->_fh, $buffer, 1) == 1 |
|
378
|
0 |
554 |
if $Debug |
|
380
|
0 |
554 |
if $Debug |
|
382
|
0 |
554 |
if $Debug |
|
384
|
66 |
488 |
if $type ne 0 and $length == 15 |
|
388
|
0 |
554 |
if $@ |
|
389
|
0 |
554 |
if $Debug |