| line |
true |
false |
branch |
|
11
|
0 |
24 |
ref $_[0] ? : |
|
12
|
7 |
17 |
defined $_[0] && length $_[0] ? : |
|
18
|
0 |
0 |
unless $i |
|
19
|
0 |
0 |
unless $parts[$i] eq '..' |
|
20
|
0 |
0 |
if $parts[$i - 1] eq '..' |
|
27
|
0 |
0 |
ref $_[0] ? : |
|
29
|
0 |
0 |
if $path eq '.' |
|
33
|
0 |
8 |
ref $_[0] ? : |
|
35
|
8 |
0 |
if (not defined $path or $path eq '' or $path eq '.') |
|
38
|
0 |
0 |
if file_name_is_absolute($path) |
|
40
|
0 |
0 |
if $parts[0] eq '..' |
|
44
|
0 |
8 |
ref $_[0] ? : |
|
47
|
0 |
8 |
unless defined $first |
|
48
|
0 |
8 |
unless defined $second |
|
60
|
0 |
8 |
ref $_[0] ? : |
|
61
|
0 |
8 |
unless my $commonised = $class->commonise(@_) |
|
63
|
0 |
8 |
unless defined $from |
|
65
|
1 |
7 |
if ($from eq '' and $to eq '') |