| inc/IO/Dir.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 0 | 34 | 0.0 |
| line | true | false | branch |
|---|---|---|---|
| 29 | 0 | 0 | unless @_ >= 1 and @_ <= 2 |
| 32 | 0 | 0 | if (@_) |
| 33 | 0 | 0 | unless open($dh, $_[0]) |
| 47 | 0 | 0 | unless @_ == 2 |
| 50 | 0 | 0 | unless opendir $dh, $dirname |
| 53 | 0 | 0 | if $^O eq 'MacOS' and not $dirname =~ /:/ |
| 59 | 0 | 0 | unless @_ == 1 |
| 65 | 0 | 0 | unless @_ == 1 |
| 71 | 0 | 0 | unless @_ == 2 |
| 77 | 0 | 0 | unless @_ == 1 |
| 83 | 0 | 0 | unless @_ == 1 |
| 91 | 0 | 0 | unless my $dh = $class->new($dir) |
| 123 | 0 | 0 | ref $data ? : |
| 125 | 0 | 0 | unless (-e $file) |
| 127 | 0 | 0 | if $io |
| 137 | 0 | 0 | unless ${*$dh;}{'io_dir_unlink'} |
| 141 | 0 | 0 | -d $file ? : |