| blib/lib/Directory/Scanner/Stream.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 14 | 22 | 63.6 |
| line | true | false | branch |
|---|---|---|---|
| 38 | 16 | 45 | unless &Scalar::Util::blessed($dir) and $dir->isa('Path::Tiny') |
| 44 | 0 | 61 | unless -d $dir |
| 46 | 0 | 61 | unless -r $dir |
| 50 | 0 | 61 | unless opendir $handle, $dir |
| 74 | 0 | 61 | unless closedir $_[0]{'_handle'} |
| 82 | 0 | 171 | if $self->{'_is_done'} |
| 85 | 0 | 171 | if $self->{'_is_closed'} |
| 93 | 232 | 61 | if (my $name = readdir $self->{'_handle'}) { } |
| 96 | 0 | 232 | unless defined $name |
| 99 | 122 | 110 | if $name eq '.' or $name eq '..' |
| 104 | 0 | 110 | if (not -r $next) { } |