| line |
true |
false |
branch |
|
156
|
5 |
11 |
if exists $params{$_} |
|
160
|
7 |
1 |
if exists $params{$_} |
|
162
|
1 |
7 |
if (exists $params{'filename'}) { } |
|
|
7 |
0 |
elsif (exists $params{'handle'} or exists $params{'read_handle'}) { } |
|
173
|
0 |
8 |
if defined $params{'write_handle'} |
|
177
|
7 |
1 |
if ($self->read_handle and not defined $self->{'last_size'}) |
|
197
|
14 |
7 |
if ($want) { } |
|
198
|
14 |
0 |
if not $self->{'file'}->is_running |
|
210
|
0 |
7 |
if $want |
|
215
|
0 |
1 |
unless my $self = shift() |
|
224
|
0 |
9 |
unless my $self = shift() |
|
227
|
1 |
8 |
if ($size < $self->{'last_size'}) |
|
242
|
4 |
7 |
if defined $self->{'last_pos'} |
|
248
|
0 |
11 |
if ($self->{'last_pos'} < $self->{'last_size'}) { } |
|
|
1 |
10 |
elsif ($self->{'renamed'}) { } |
|
256
|
1 |
0 |
if ($self->{'last_pos'}) |
|
295
|
0 |
2 |
unless $self->{'running_initial'} |
|
356
|
0 |
1 |
unless $self->{'running_initial'} |
|
363
|
1 |
0 |
$opts{'horizon'} ? : |
|
364
|
0 |
1 |
if $horizon < 0 |
|
366
|
0 |
1 |
ref $str_pattern ? : |
|
371
|
0 |
3 |
if $len > $offset |
|
379
|
1 |
2 |
if (() = ($buffer . $prev) =~ /$re/gsu) |