| line |
true |
false |
branch |
|
23
|
4 |
0 |
if (defined(my $globs = delete $args{'globs'})) { } |
|
24
|
0 |
4 |
unless ref $globs eq 'ARRAY' |
|
29
|
3 |
1 |
if (defined(my $check_freq = delete $args{'check_freq'})) |
|
32
|
1 |
3 |
if (defined(my $tail_new = delete $args{'tail_new'})) |
|
35
|
0 |
4 |
if keys %args |
|
45
|
0 |
12 |
unless open my $fh, '<', $filename |
|
46
|
6 |
6 |
if $seek_end |
|
56
|
45 |
24 |
if ($pos == $size) { } |
|
|
0 |
24 |
elsif ($pos > $size) { } |
|
77
|
40 |
7 |
if $self->{'_last_check_time'} and $self->{'_last_check_time'} >= $now - $self->{'check_freq'} |
|
83
|
1 |
8 |
unless (@files) |
|
87
|
4 |
4 |
if (defined $self->{'_cur_fh'}{$glob}) { } |
|
91
|
8 |
8 |
if ($_ gt $self->{'_cur_file'}{$glob}) |
|
107
|
1 |
61 |
unless $fh |
|
109
|
18 |
43 |
if (length $line) { } |
|
|
8 |
35 |
elsif (keys %{$$self{'_pending'}{$glob};}) { } |
|
117
|
6 |
2 |
if length $line |