line |
true |
false |
branch |
34
|
0 |
1 |
unless $self->magic eq "\320\317\cQ\340\241\261\cZ\341" |
63
|
1 |
1 |
if $block == $UNUSED |
102
|
0 |
6 |
unless $nbytes == $bytes_to_read |
107
|
5 |
1 |
if ($rec =~ /^\w\0\w\0/) { } |
|
0 |
1 |
elsif ($rec =~ /^\0\w\0\w/) { } |
|
1 |
0 |
elsif ($rec =~ /^\0{64}/) { } |
117
|
0 |
0 |
if (/[A-z]/) { } |
172
|
0 |
51 |
unless $stream_size |
173
|
51 |
0 |
if $stream_size and $stream_size eq 'big' |
174
|
0 |
0 |
if $stream_size and $stream_size eq 'mini' |
185
|
3 |
0 |
if ($stream_size eq 'big') { } |
191
|
0 |
3 |
unless $nbytes == $bytes_to_read |
205
|
0 |
6 |
if ($stream_size eq 'mini') { } |
220
|
0 |
47 |
if $SPECIAL{$block} |
223
|
0 |
47 |
if $block_set{$block} |
230
|
0 |
47 |
unless defined $block |