| line |
true |
false |
branch |
|
208
|
2 |
10 |
unless (defined $aref) |
|
209
|
0 |
12 |
unless ref $aref eq 'ARRAY' |
|
283
|
6 |
0 |
$_[0]->read($buf, 1) ? : |
|
307
|
2 |
39 |
if (not defined $/) { } |
|
|
39 |
0 |
elsif ($/ eq "\n") { } |
|
|
0 |
0 |
elsif (ref $/) { } |
|
309
|
0 |
2 |
if $self->eof |
|
329
|
28 |
19 |
if ($self->_eos) |
|
339
|
32 |
15 |
if $3 |
|
341
|
6 |
1 |
$line eq '' ? : |
|
368
|
0 |
2 |
unless wantarray |
|
388
|
0 |
7 |
defined $\ ? : |
|
412
|
0 |
18 |
$off ? : |
|
418
|
12 |
18 |
if ($self->_eos) |
|
513
|
75 |
13 |
if *{$_[0];}->{'Str'} < $#{*{$_[0];}->{'AR'};} |
|
514
|
0 |
13 |
if *{$_[0];}->{'Str'} > $#{*{$_[0];}->{'AR'};} |
|
516
|
13 |
0 |
if *{$_[0];}->{'Str'} == $#{*{$_[0];}->{'AR'};} |
|
543
|
18 |
4 |
if ($whence == 0) { } |
|
|
2 |
2 |
elsif ($whence == 1) { } |
|
|
2 |
0 |
elsif ($whence == 2) { } |
|
563
|
22 |
22 |
if (length *$self->{'AR'}[$istr] > $pos) { } |
|
613
|
0 |
12 |
unless defined($str_s = *$self->{'AR'}[$s]) |
|
648
|
0 |
43 |
unless ref $pos eq 'ARRAY' |
|
700
|
12 |
2 |
defined $_[1] && UNIVERSAL::isa($_[1], 'IO::ScalarArray') ? : |
|
707
|
2 |
14 |
wantarray ? : |