line |
true |
false |
branch |
22
|
6 |
51 |
unless defined $_[0] and length $_[0] |
32
|
8 |
4 |
if $d eq '.' and @d || @d0 || $abs |
33
|
6 |
7 |
if ($d eq '..' and @d > 1 && $d[-1] ne '..' || @d == 1 && $d[-1] ne '..' && $d[-1] ne '.' && @d0 || $abs) |
39
|
3 |
38 |
if (wantarray) { } |
42
|
13 |
25 |
$abs ? : |
47
|
3 |
12 |
unless defined $_[0] and length $_[0] |
48
|
8 |
4 |
$_[0] =~ m[\A/] ? : |
52
|
3 |
2 |
unless defined $_[0] and length $_[0] |
53
|
1 |
1 |
$_[0] =~ m[\A/] ? : |
57
|
6 |
23 |
unless @_ > 1 |
61
|
0 |
49 |
unless defined $_ and length $_ |
62
|
23 |
26 |
unless $i++ |
63
|
7 |
19 |
if (m[\A/]) { } |
66
|
6 |
13 |
$res =~ m[/\z] ? : |
77
|
3 |
6 |
unless defined $_[0] and length $_[0] |
78
|
0 |
6 |
unless defined $_[1] and length $_[1] |
79
|
1 |
5 |
unless is_abs_path($_[1]) |