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 ? : |