| line |
true |
false |
branch |
|
15
|
152 |
0 |
if $path |
|
17
|
0 |
0 |
defined $path ? : |
|
24
|
122 |
4 |
@_ ? : |
|
31
|
0 |
5 |
unless $self->follow |
|
37
|
1 |
4 |
unless $self->resolved |
|
43
|
0 |
4 |
unless $self->resolvedir |
|
50
|
0 |
2 |
unless $self->relative($path) |
|
56
|
2 |
0 |
if length $self->chop |
|
65
|
2 |
0 |
defined $path ? : |
|
72
|
0 |
0 |
if ($_[0] =~ /^opendir\b/ and $_[0] =~ /\bNot\s+a\s+directory\b/ and $Cwd::VERSION < 2.18 and not -d $file) { } |
|
86
|
4 |
0 |
if eval {
do {
require Cwd
}
} |
|
88
|
0 |
4 |
unless $path |
|
89
|
0 |
4 |
$spec->file_name_is_absolute($file) ? : |
|
108
|
19 |
0 |
if @_ |
|
117
|
107 |
0 |
defined $vol ? : |
|
119
|
108 |
0 |
$dirs ? : |
|
123
|
0 |
15 |
if ($file eq $self->curdir) { } |
|
|
1 |
14 |
elsif ($file eq $self->updir) { } |
|
132
|
0 |
1 |
if (not @dirs or $dirs[-1] eq $self->updir) { } |
|
|
1 |
0 |
elsif (length $dirs[-1] and $dirs[-1] ne $self->curdir) { } |
|
140
|
0 |
0 |
length $dirs[-1] ? : |
|
149
|
14 |
35 |
if length $file |
|
167
|
1 |
34 |
if @$dirs == 1 and not length $dirs->[0] |
|
168
|
32 |
2 |
if length($file = CORE::pop @$dirs) |
|
177
|
14 |
1 |
if defined $link |
|
179
|
0 |
1 |
-l $self->path ? : |
|
189
|
15 |
1 |
unless ($self->file_name_is_absolute($path)) |
|
190
|
0 |
15 |
unless length $self->chop |
|
203
|
19 |
5 |
@_ ? : |
|
205
|
1 |
9 |
if $$seen{$self->canonical}++ |
|
206
|
0 |
9 |
unless $self->follow |
|
213
|
0 |
4 |
@_ ? : |
|
216
|
0 |
19 |
unless $self->resolved($seen) |
|
218
|
4 |
15 |
unless length $last |