line |
true |
false |
branch |
11
|
0 |
2 |
if not $start or $start < 0 |
12
|
0 |
2 |
if not $lg or $lg < 0 |
35
|
0 |
4 |
if ref $self eq 'SCALAR' |
64
|
1 |
0 |
if $whence == 0 |
65
|
0 |
1 |
if $whence == 1 |
66
|
0 |
1 |
if $whence == 2 |
68
|
0 |
1 |
if $self->{'CRPOS'} < 0 |
69
|
0 |
1 |
if $self->{'CRPOS'} > $self->{'LG'} |
91
|
0 |
0 |
if $self->{'CRPOS'} >= $self->{'LG'} |
106
|
0 |
0 |
unless $lg |
107
|
0 |
0 |
$lg ? : |
114
|
0 |
1 |
if $self->{'CRPOS'} >= $self->{'LG'} |
115
|
0 |
1 |
if $self->{'CRPOS'} + $lg > $self->{'LG'} |
116
|
0 |
1 |
unless $lg |
129
|
0 |
1 |
unless $lg |
135
|
4 |
1 |
unless wantarray |
145
|
2 |
5 |
if $self->{'CRPOS'} >= $self->{'LG'} |
148
|
1 |
4 |
unless (defined $/) |
165
|
0 |
4 |
unless (defined $text) |
172
|
0 |
4 |
if $self->{'CRPOS'} + $lg > $self->{'LG'} |