| lib/Perlmazing/Perlmazing/splitpath.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 6 | 8 | 75.0 |
| line | true | false | branch |
|---|---|---|---|
| 6 | 0 | 8 | unless defined $path |
| 9 | 5 | 3 | $path =~ /^\\\\(\w+)/u ? : |
| 10 | 5 | 3 | if (defined $unc_name) |
| 15 | 5 | 0 | if (defined $unc_name and @items and length $items[0]) |