line |
true |
false |
branch |
93
|
0 |
0 |
unless (defined $sref)
|
94
|
0 |
0 |
unless ref $sref eq 'SCALAR'
|
170
|
0 |
0 |
if $self->eof
|
189
|
0 |
0 |
if $self->eof
|
200
|
0 |
0 |
if (not defined $/) { }
|
|
0 |
0 |
elsif ($/ eq "\n") { }
|
|
0 |
0 |
elsif (ref $/) { }
|
211
|
0 |
0 |
if ord substr($$sr, $i, 1) == 10
|
216
|
0 |
0 |
if ($i < $len) { }
|
234
|
0 |
0 |
if *$self->{'Pos'} > $len
|
246
|
0 |
0 |
unless length $/
|
250
|
0 |
0 |
length $/ ? :
|
|
0 |
0 |
if (length $/ ? $$sr =~ m[\Q$/\E]g : $$sr =~ /\n\n/g) { }
|
277
|
0 |
0 |
unless wantarray
|
298
|
0 |
0 |
defined $\ ? :
|
334
|
0 |
0 |
$off ? :
|
459
|
0 |
0 |
if ($whence == 0) { }
|
|
0 |
0 |
elsif ($whence == 1) { }
|
|
0 |
0 |
elsif ($whence == 2) { }
|
465
|
0 |
0 |
if (*$self->{'Pos'} < 0)
|
466
|
0 |
0 |
if (*$self->{'Pos'} > $eofpos)
|
551
|
0 |
0 |
defined $_[1] && UNIVERSAL::isa($_[1], 'Test::Builder::IO::Scalar') ? :
|
559
|
0 |
0 |
wantarray ? :
|