blib/lib/getcwd.pl | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 0 | 14 | 0.0 |
line | true | false | branch |
---|---|---|---|
18 | 0 | 0 | unless (@cst = stat ".") |
26 | 0 | 0 | if $dotdots |
29 | 0 | 0 | unless (opendir getcwd::PARENT, $dotdots) |
34 | 0 | 0 | unless (@cst = stat $dotdots) |
40 | 0 | 0 | if ($pst[0] == $cst[0] and $pst[1] == $cst[1]) { } |
48 | 0 | 0 | unless (defined($dir = readdir getcwd::PARENT)) |
54 | 0 | 0 | unless (@tst = lstat "$dotdots/$dir") |