| blib/lib/Path/Naive.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 26 | 30 | 86.6 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 26 | 2 | 1 | 5 | defined $path and length $path |
| 27 | 0 | 0 | 5 | defined $base and length $base |
| 34 | 2 | 1 | 11 | defined $path and length $path |
| 40 | 2 | 1 | 2 | defined $path and length $path |
| 51 | 70 | 19 | 3 | $elem eq '.' and @elems || @elems0 || $is_abs |
| 52 | 55 | 14 | 5 | $elem eq '..' and @elems > 1 && $elems[-1] ne '..' || @elems == 1 && $elems[-1] ne '..' && $elems[-1] ne '.' && @elems0 || $is_abs |
| 63 | 4 | 2 | 48 | defined $path and length $path |
| 72 | 0 | 0 | 44 | defined $_ and length $_ |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 51 | 16 | 2 | 4 | @elems || @elems0 || $is_abs |
| 52 | 5 | 1 | 7 | @elems > 1 && $elems[-1] ne '..' || @elems == 1 && $elems[-1] ne '..' && $elems[-1] ne '.' && @elems0 || $is_abs |