| line |
true |
false |
branch |
|
21
|
0 |
12 |
unless defined $$ref |
|
40
|
0 |
0 |
unless defined ${$_[1];} |
|
67
|
0 |
0 |
if ($pos >= $len) { } |
|
71
|
0 |
0 |
$#_ ? : |
|
85
|
0 |
0 |
$_[3] ? : |
|
98
|
20 |
0 |
if ($whence == 0) { } |
|
|
0 |
0 |
elsif ($whence == 1) { } |
|
|
0 |
0 |
elsif ($whence == 2) { } |
|
107
|
0 |
20 |
if ($self->{'pos'} > $len) { } |
|
|
0 |
20 |
elsif ($self->{'pos'} < 0) { } |
|
141
|
0 |
0 |
if ($pos >= $len) { } |
|
164
|
2 |
198 |
if (not defined $/ or (my $idx = index($$ref, $/, $pos)) == -1) { } |
|
165
|
0 |
2 |
if $pos >= length $$ref |
|
179
|
12 |
0 |
if (defined $/) |
|
188
|
0 |
12 |
if (length $r > 0) |
|
192
|
0 |
12 |
wantarray ? : |
|
196
|
0 |
0 |
defined $_[1] && UNIVERSAL::isa($_[1], 'Mail::Box::FastScalar') ? : |
|
204
|
0 |
0 |
wantarray ? : |