Branch Coverage

blib/lib/IO/ScalarArray.pm
Criterion Covered Total %
branch 36 50 72.0


line true false branch
201 3 9 unless (defined $aref)
202 0 12 unless ref $aref eq 'ARRAY'
287 6 0 $_[0]->read($buf, 1) ? :
311 2 39 if (not defined $/) { }
39 0 elsif ($/ eq "\n") { }
0 0 elsif (ref $/) { }
313 0 2 if $self->eof
333 20 17 if ($self->_eos)
343 32 5 if $3
345 6 1 $line eq '' ? :
372 0 2 unless wantarray
392 0 5 defined $\ ? :
416 0 18 $off ? :
422 9 18 if ($self->_eos)
517 52 23 if *{$_[0];}->{'Str'} < $#{*{$_[0];}->{'AR'};}
518 0 23 if *{$_[0];}->{'Str'} > $#{*{$_[0];}->{'AR'};}
520 23 0 if *{$_[0];}->{'Str'} == $#{*{$_[0];}->{'AR'};}
547 18 4 if ($whence == 0) { }
2 2 elsif ($whence == 1) { }
2 0 elsif ($whence == 2) { }
567 22 18 if (length *$self->{'AR'}[$istr] > $pos) { }
617 0 9 unless defined($str_s = *$self->{'AR'}[$s])
652 0 41 unless ref $pos eq 'ARRAY'
704 12 2 defined $_[1] && UNIVERSAL::isa($_[1], 'IO::ScalarArray') ? :
711 2 14 wantarray ? :