| blib/lib/File/RDir.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 13 | 16 | 81.2 |
| line | true | false | branch |
|---|---|---|---|
| 20 | 0 | 1 | unless opendir my $hdl, $dir |
| 29 | 0 | 9 | unless $self->{'hdl'} |
| 37 | 8 | 31 | unless (defined $ele) |
| 42 | 1 | 7 | unless defined $ndir |
| 47 | 0 | 7 | unless opendir $self->{'hdl'}, $full_dir |
| 51 | 16 | 15 | if $ele eq '.' or $ele eq '..' |
| 55 | 7 | 8 | if (-d $full_ele) |
| 61 | 1 | 8 | unless defined $ele |