| line |
true |
false |
branch |
|
138
|
0 |
4 |
unless defined $separator |
|
140
|
0 |
4 |
unless (defined $pre_match) |
|
143
|
0 |
0 |
if $buf eq '' |
|
179
|
0 |
36 |
if ($$self{'die_on_anchors'} and $tstr eq '^' or $tstr eq '$') |
|
190
|
6 |
4 |
if (not ref $_) { } |
|
|
4 |
0 |
elsif (ref $_ eq 'Regexp') { } |
|
207
|
2 |
7 |
if ($File::Stream::End_Of_String or not @matches) { } |
|
209
|
0 |
2 |
unless $self->fill_buffer |
|
215
|
7 |
1 |
if defined $matches[$_] |
|
217
|
0 |
7 |
unless defined $index |
|
219
|
0 |
7 |
unless $$self{'buffer'} =~ s/^(.*?)\Q$match\E//s |
|
241
|
0 |
2 |
unless $bytes |
|
264
|
0 |
0 |
defined $, ? : |
|
265
|
0 |
0 |
if defined $\ |
|
285
|
0 |
0 |
if @_ < 3 |
|
288
|
0 |
0 |
unless defined $$bufref |
|
290
|
0 |
0 |
unless defined $offset |
|
291
|
0 |
0 |
if (length $$self{'buffer'} < $len) |
|
297
|
0 |
0 |
unless ($bytes) |
|
329
|
0 |
0 |
if not length $_[0]{'buffer'} |