| lib/Path/Resolve.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 24 | 99 | 24.2 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 48 | 21 | 0 | 0 | $ext and substr($f, -1 * length($ext)) eq $ext |
| 132 | 0 | 0 | 0 | $device && !($device =~ /^.:/) |
| 168 | 0 | 0 | 0 | $device && !($device =~ /^.:/) |
| 171 | 0 | 0 | 0 | $device and $resolvedDevice |
| 0 | 0 | 0 | $device and $resolvedDevice and lc $device ne lc $resolvedDevice | |
| 185 | 0 | 0 | 0 | $resolvedDevice and $resolvedAbsolute |
| 208 | 0 | 0 | 0 | @device && $device[1] ne ':' |
| 213 | 0 | 0 | 0 | @device and $device[1] eq ':' |
| 223 | 0 | 0 | 0 | $tail and $trailingSlash |
| 239 | 0 | 0 | 0 | @paths and not $paths[0] =~ m[^[\\/]{2}[^\\/]] |
| 364 | 2 | 16 | 24 | $i >= -1 and not $resolvedAbsolute |
| 397 | 8 | 81 | 8 | $path and $trailingSlash |
| line | l | !l | condition |
|---|---|---|---|
| 72 | 0 | 0 | $result[1] || '' |
| 0 | 0 | $result[2] || '' | |
| 73 | 0 | 0 | $result[3] || '' |
| 109 | 0 | 0 | $$pathObject{'root'} || '' |
| 115 | 0 | 0 | $$pathObject{'base'} || '' |
| 131 | 0 | 0 | $result[1] || '' |
| 167 | 0 | 0 | $result[1] || '' |
| 199 | 0 | 0 | $resolvedDevice . ($resolvedAbsolute ? '\\' : '') . $resolvedTail || '.' |
| 206 | 0 | 0 | $result[1] || '' |
| 330 | 6 | 3 | $allParts[1] ||= '' |
| 331 | 9 | 0 | $allParts[2] ||= '' |
| 332 | 5 | 4 | $allParts[3] ||= '' |
| 349 | 4 | 8 | $$pathObject{'root'} || '' |
| 355 | 10 | 2 | $$pathObject{'base'} || '' |
| 379 | 18 | 0 | ($resolvedAbsolute ? '/' : '') . $resolvedPath || '.' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 28 | 9 | 0 | 3 | $root or $dir |
| 84 | 0 | 0 | 0 | not $path or ref $path |
| 90 | 0 | 0 | 0 | not @allParts or scalar @allParts != 4 |
| 110 | 0 | 0 | 0 | not defined $root or ref $root |
| 134 | 0 | 0 | 0 | !!$result[2] || $isUnc |
| 209 | 0 | 0 | 0 | !!$result[2] || $isUnc |
| 220 | 0 | 0 | 0 | $tail or $isAbsolute |
| 320 | 0 | 0 | 9 | not $path or ref $path |
| 326 | 0 | 0 | 9 | not @allParts or scalar @allParts != 4 |
| 350 | 0 | 0 | 12 | not defined $root or ref $root |
| 394 | 69 | 0 | 28 | $path or $isAbsolute |