| lib/Plack/Middleware/DirListing.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 16 | 24 | 66.6 |
| line | true | false | branch |
|---|---|---|---|
| 52 | 3 | 2 | if (my($field, $order) = $env->{'QUERY_STRING'} =~ /C=(\w);O=(\w)/) |
| 53 | 1 | 2 | $order eq 'A' ? : |
| 74 | 0 | 21 | if $filetype eq "directory" |
| 75 | 0 | 21 | if $filetype =~ /^image/ |
| 76 | 0 | 21 | if $filetype =~ /pdf$/ |
| 77 | 0 | 21 | if $filetype =~ /html$/ |
| 91 | 10 | 21 | if $ent eq "." or $ent eq ".." |
| 101 | 0 | 21 | if ($is_dir) |
| 106 | 0 | 21 | $is_dir ? : |
| 123 | 0 | 2 | unless $self->root |
| 152 | 7 | 0 | if (-d $dir) |
| 153 | 5 | 2 | if (substr($dir, -1) eq '/') { } |