| line |
true |
false |
branch |
|
43
|
0 |
40 |
unless (defined $d) |
|
45
|
0 |
0 |
if ($self->error_handler->($self, $path, $!)) { } |
|
61
|
40 |
169 |
unless (defined $next) |
|
66
|
88 |
81 |
if not $self->follow_hidden and $next =~ /^\./o |
|
68
|
81 |
0 |
if $next ne '.' and $next ne '..' |
|
73
|
36 |
45 |
if (-d $f) { } |
|
119
|
0 |
5 |
unless $self->root |
|
121
|
1 |
4 |
unless ($self->root->open) |
|
131
|
0 |
0 |
if $self->show_warnings |
|
134
|
1 |
3 |
unless $self->error_handler |
|
148
|
3 |
1 |
$self->breadth_first ? : |
|
165
|
4 |
36 |
unless ($self->queue->[0]) |
|
171
|
0 |
36 |
if $debug |
|
179
|
54 |
27 |
unless ($self->follow_symlinks) |
|
187
|
0 |
81 |
if $debug |
|
189
|
36 |
45 |
if (-d $next) |
|
193
|
36 |
0 |
unless ($self->depth and $self->cur_depth > $self->depth) |
|
197
|
3 |
33 |
if ($self->interesting) |
|
200
|
0 |
3 |
unless ref $new eq 'ARRAY' |