| line |
!l |
l&&!r |
l&&r |
condition |
|
37
|
1122 |
3 |
0 |
ref $_ && (ref $_ eq 'Path::Abstract::Underload' || blessed $_ && $_->isa('Path::Abstract::Underload')) |
|
43
|
132 |
391 |
263 |
$_[0] && substr($_[0], 0, 1) eq '/' |
|
45
|
132 |
513 |
141 |
$path && substr($path, -1) eq '/' |
|
54
|
31 |
645 |
110 |
$path ne '/' and $trailing |
|
131
|
47 |
7 |
0 |
1 == @path and '' eq $path[0] |
|
133
|
4 |
15 |
10 |
defined $path[0] && length $path[0] |
|
140
|
15 |
30 |
3 |
$index == @path - 1 and not defined $path[$index] |
|
141
|
3 |
0 |
45 |
defined $path[$index] and length $path[$index] |
|
187
|
6 |
24 |
0 |
@_ and not defined $_[0] |