| blib/lib/Net/FTP/Path/Iter/Entry.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 1 | 3 | 33.3 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 88 | 5 | 0 | 0 | eval { do { croak("unable to chdir to ", $path) unless $server->cwd($path); croak("error listing $path") unless my $listing = $server->dir("."); foreach my $entry (&parse_dir($listing)) { my %attr; @attr{"name", "type", "size", "mtime", "mode"} = @$entry; $attr{'parent'} = $path; $attr{'_has_attrs'} = 1; push @entries, \%attr; } ; 1 } } // ($err = $@) |