| 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'}) { } |
|
168
|
7 |
0 |
unless defined $handle |
|
174
|
0 |
8 |
if defined $params{'write_handle'} |
|
178
|
7 |
1 |
if ($self->read_handle and not defined $self->{'last_size'}) |
|
198
|
14 |
7 |
if ($want) { } |
|
199
|
14 |
0 |
if not $self->{'file'}->is_running |
|
211
|
0 |
7 |
if $want |
|
216
|
0 |
1 |
unless my $self = shift() |
|
225
|
0 |
9 |
unless my $self = shift() |
|
228
|
1 |
8 |
if ($size < $self->{'last_size'}) |
|
243
|
4 |
7 |
if defined $self->{'last_pos'} |
|
249
|
0 |
11 |
if ($self->{'last_pos'} < $self->{'last_size'}) { } |
|
|
1 |
10 |
elsif ($self->{'renamed'}) { } |
|
257
|
1 |
0 |
if ($self->{'last_pos'}) |
|
296
|
0 |
2 |
unless $self->{'running_initial'} |
|
298
|
1 |
1 |
unless defined $whence |
|
357
|
0 |
1 |
unless $self->{'running_initial'} |
|
363
|
1 |
0 |
unless defined $opts{'horizon'} |
|
364
|
1 |
0 |
$opts{'horizon'} ? : |
|
365
|
0 |
1 |
if $horizon < 0 |
|
367
|
0 |
1 |
ref $str_pattern ? : |
|
372
|
0 |
3 |
if $len > $offset |
|
380
|
1 |
2 |
if (() = ($buffer . $prev) =~ /$re/gs) |