| blib/lib/Storage/Abstract/Driver/Superpath.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 15 | 16 | 93.7 |
| line | true | false | branch |
|---|---|---|---|
| 40 | 6 | 7 | if ($name =~ s/^$superpath//u) |
| 52 | 1 | 1 | unless defined $new_path |
| 64 | 3 | 4 | if ($opts{'directory'} and not defined $adjusted_path) |
| 69 | 0 | 3 | if $i > $#parts_superpath |
| 70 | 2 | 1 | if $parts_path[$i] ne $parts_superpath[$i] |
| 77 | 1 | 3 | unless defined $adjusted_path |
| 86 | 1 | 1 | unless defined $new_path |
| 97 | 1 | 1 | unless defined $new_path |