| line |
true |
false |
branch |
|
61
|
808 |
682 |
if (ref $filePt eq 'SCALAR') { } |
|
83
|
478 |
204 |
unless $isRandom |
|
105
|
681 |
27 |
unless ($self->{'TESTED'}) |
|
107
|
681 |
0 |
if (seek $fp, 1, 1 and seek $fp, -1, 1) { } |
|
113
|
681 |
27 |
$self->{'TESTED'} == 1 ? : |
|
124
|
765 |
5009 |
if ($self->{'TESTED'} < 0) { } |
|
143
|
8 |
7969 |
unless defined $whence |
|
145
|
1261 |
6716 |
if ($self->{'TESTED'} < 0) { } |
|
147
|
894 |
367 |
if ($whence == 0) { } |
|
|
275 |
92 |
elsif ($whence == 1) { } |
|
|
0 |
92 |
elsif ($self->{'NoBuffer'} and $self->{'FILE_PT'}) { } |
|
157
|
1248 |
13 |
if ($newPos >= 0) |
|
179
|
0 |
26550 |
if ($len & 4160749568) |
|
180
|
0 |
0 |
if $len < 0 |
|
185
|
0 |
0 |
if $num < $maxLen |
|
188
|
0 |
0 |
if $len <= 0 |
|
189
|
0 |
0 |
$len < $maxLen ? : |
|
192
|
0 |
0 |
unless $n |
|
195
|
0 |
0 |
if $n < $l |
|
200
|
7649 |
18901 |
if ($self->{'TESTED'} < 0) { } |
|
202
|
0 |
7649 |
if $self->{'NoBuffer'} |
|
207
|
0 |
459 |
if ($num > 0 and $self->{'FILE_PT'}) |
|
211
|
0 |
0 |
if ($num) |
|
218
|
7190 |
459 |
if ($len <= $num) { } |
|
|
361 |
98 |
elsif ($num <= 0) { } |
|
231
|
7084 |
11817 |
unless defined $_[0] |
|
234
|
0 |
26189 |
if ($self->{'DEBUG'}) |
|
236
|
0 |
0 |
unless ($self->{'DEBUG'}{$pos} and $self->{'DEBUG'}{$pos} > $rtnVal) |
|
253
|
123 |
6478 |
if ($self->{'TESTED'} < 0) { } |
|
255
|
0 |
123 |
if $self->{'NoBuffer'} |
|
257
|
0 |
123 |
if ($fp) { } |
|
261
|
0 |
0 |
unless $num |
|
268
|
0 |
0 |
if ($pos >= 0) |
|
273
|
0 |
0 |
unless $num = read($fp, $buff, $CHUNK_SIZE) |
|
280
|
18 |
105 |
if ($pos < 0) { } |
|
282
|
0 |
18 |
if $self->{'POS'} > $pos |
|
293
|
6458 |
20 |
if (defined $_[0]) { } |
|
299
|
0 |
6601 |
if ($self->{'DEBUG'}) |
|
301
|
0 |
0 |
unless ($self->{'DEBUG'}{$pos} and $self->{'DEBUG'}{$pos} > $rtnVal) |
|
331
|
0 |
0 |
unless $self->{'FILE_PT'} |
|
332
|
0 |
0 |
if $self->{'POS'} < 0 |
|
333
|
0 |
0 |
if ($self->{'POS'} > $CHUNK_SIZE) |
|
335
|
0 |
0 |
if ($purge >= $self->{'LEN'}) { } |
|
|
0 |
0 |
elsif ($purge > 0) { } |
|
342
|
0 |
0 |
if $self->{'LEN'} < $SKIP_SIZE |
|
360
|
693 |
51 |
if $self->{'FILE_PT'} |
|
370
|
0 |
479 |
if ($self->{'DEBUG'}) |
|
372
|
0 |
0 |
if ($self->Seek(0, 2)) { } |
|
380
|
0 |
0 |
if (defined $last and $last < $pos) |
|
387
|
0 |
0 |
if ($buff =~ /[^\0]/) |
|
394
|
0 |
0 |
unless defined $last and $last > $cur |
|
397
|
0 |
0 |
if $bad |
|
405
|
477 |
2 |
if ($self->{'FILE_PT'}) |