| line |
true |
false |
branch |
|
25
|
4 |
0 |
if (defined(my $globs = delete $args{'globs'})) { } |
|
26
|
0 |
4 |
unless ref $globs eq 'ARRAY' |
|
31
|
3 |
1 |
if (defined(my $check_freq = delete $args{'check_freq'})) |
|
34
|
1 |
3 |
if (defined(my $tail_new = delete $args{'tail_new'})) |
|
37
|
0 |
4 |
if keys %args |
|
47
|
0 |
12 |
unless open my $fh, '<', $filename |
|
48
|
6 |
6 |
if $seek_end |
|
58
|
45 |
24 |
if ($pos == $size) { } |
|
|
0 |
24 |
elsif ($pos > $size) { } |
|
79
|
40 |
7 |
if $self->{'_last_check_time'} and $self->{'_last_check_time'} >= $now - $self->{'check_freq'} |
|
85
|
1 |
8 |
unless (@files) |
|
86
|
1 |
0 |
if $WARN_NO_MATCH |
|
89
|
4 |
4 |
if (defined $self->{'_cur_fh'}{$glob}) { } |
|
93
|
8 |
8 |
if ($_ gt $self->{'_cur_file'}{$glob}) |
|
109
|
1 |
61 |
unless $fh |
|
111
|
18 |
43 |
if (length $line) { } |
|
|
8 |
35 |
elsif (keys %{$$self{'_pending'}{$glob};}) { } |
|
119
|
6 |
2 |
if length $line |