Branch Coverage

blib/lib/File/RandomAccess.pm

Criterion	Covered	Total	%
branch	49	106	46.2

line	true	false	branch
61	809	703	if (ref $filePt eq 'SCALAR') { }
83	495	208	unless $isRandom
105	702	27	unless ($self->{'TESTED'})
107	702	0	if (seek $fp, 1, 1 and seek $fp, -1, 1) { }
113	702	27	$self->{'TESTED'} == 1 ? :
124	765	5123	if ($self->{'TESTED'} < 0) { }
143	8	8048	unless defined $whence
145	1264	6792	if ($self->{'TESTED'} < 0) { }
147	896	368	if ($whence == 0) { }
	275	93	elsif ($whence == 1) { }
	0	93	elsif ($self->{'NoBuffer'} and $self->{'FILE_PT'}) { }
157	1251	13	if ($newPos >= 0)
179	0	26929	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	7655	19274	if ($self->{'TESTED'} < 0) { }
202	0	7655	if $self->{'NoBuffer'}
207	0	459	if ($num > 0 and $self->{'FILE_PT'})
211	0	0	if ($num)
218	7196	459	if ($len <= $num) { }
	361	98	elsif ($num <= 0) { }
231	7170	12104	unless defined $_[0]
234	0	26568	if ($self->{'DEBUG'})
236	0	0	unless ($self->{'DEBUG'}{$pos} and $self->{'DEBUG'}{$pos} > $rtnVal)
253	123	6560	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	6540	20	if (defined $_[0]) { }
299	0	6683	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	714	51	if $self->{'FILE_PT'}
370	0	496	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	494	2	if ($self->{'FILE_PT'})