line |
true |
false |
branch |
113
|
3 |
10 |
if (not ref $self->_source) { } |
|
9 |
1 |
elsif (ref $self->_source eq ref \'') { } |
|
1 |
0 |
elsif (ref $self->_source) { } |
114
|
1 |
2 |
unless open $fh, '<', $self->_source |
118
|
0 |
9 |
unless open $fh, '<', $self->_source |
157
|
0 |
9 |
unless $read == $try_to_read |
163
|
0 |
9 |
if ($self->_trailer->{'offset_size'} == 3) |
201
|
4 |
0 |
if exists $singletons{$length} |
208
|
0 |
174 |
if $length > 3 |
218
|
0 |
174 |
if ($length == 3) |
223
|
0 |
0 |
if ($b->bcmp('Math::BigInt'->new(2)->bpow(63)) > 0) |
236
|
0 |
6 |
if $length > 3 |
237
|
0 |
6 |
if $length < 2 |
252
|
0 |
6 |
if $length != 3 |
319
|
40 |
0 |
$self->_object_ref_size == 1 ? : |
338
|
23 |
0 |
$self->_object_ref_size == 1 ? : |
346
|
23 |
0 |
$self->_object_ref_size == 1 ? : |
366
|
0 |
554 |
unless read($self->_fh, $buffer, 1) == 1 |
374
|
66 |
488 |
if $type ne '0' and $length == 15 |
378
|
0 |
554 |
if $@ |