line |
true |
false |
branch |
63
|
3 |
0 |
if $self->has_next_poll
|
65
|
2 |
1 |
unless defined $until
|
68
|
0 |
1 |
if $t > $until
|
75
|
0 |
2 |
if $self->has_next_poll
|
77
|
0 |
2 |
unless defined $when
|
80
|
0 |
2 |
if $t > $when
|
98
|
1 |
0 |
if $self->has_next_poll
|
113
|
0 |
19 |
unless eval {
do {
die q[Failed to open '] . $self->directory . "': $!" unless opendir DIR, $self->directory;
@files = grep({not $_ =~ /^\.\.?$/;} readdir DIR);
closedir DIR
}
}
|
114
|
0 |
19 |
unless opendir DIR, $self->directory
|
127
|
0 |
19 |
unless ref $files
|
135
|
10 |
0 |
if $self->filter->($fname, $fpath)
|
143
|
2 |
11 |
if (ref $cb eq 'ARRAY')
|
149
|
11 |
0 |
if ref $cb eq 'CODE'
|