| line |
true |
false |
branch |
|
21
|
0 |
17 |
unless defined $name |
|
24
|
14 |
3 |
unless defined $api |
|
25
|
0 |
17 |
unless $api == 0 or $api == 1 |
|
29
|
12 |
5 |
unless (defined $path_class) |
|
30
|
3 |
9 |
if ($api >= 1) { } |
|
37
|
10 |
7 |
$path_class eq 'Path::Class' ? : |
|
38
|
10 |
7 |
$path_class eq 'Path::Class' ? : |
|
40
|
1 |
16 |
if (XXX) { } |
|
|
1 |
15 |
elsif (XXX) { } |
|
|
4 |
11 |
elsif ($path_class eq 'Path::Tiny') { } |
|
|
10 |
1 |
elsif ($path_class eq 'Path::Class') { } |
|
|
1 |
0 |
elsif ($path_class eq 'File::Spec') { } |
|
69
|
0 |
17 |
if $^O eq "MSWin32" and $strict |
|
72
|
0 |
17 |
if %args |
|
83
|
0 |
17 |
if ($^O eq 'MSWin32') { } |
|
110
|
3 |
23 |
XXX ? : |
|
117
|
3 |
28 |
XXX ? : |
|
122
|
24 |
0 |
if exists $$self{"${type}_dirs"} |
|
129
|
0 |
12 |
unless @subpath |
|
130
|
0 |
12 |
unless defined $self->{$type} |
|
171
|
1 |
1 |
defined $base ? : |
|
177
|
1 |
1 |
if (defined $self->{'runtime'}) |
|
183
|
1 |
0 |
if $self->{'strict'} |
|
187
|
0 |
0 |
if ($^O eq "linux") |
|
198
|
0 |
0 |
unless -d $maybe |
|
199
|
0 |
0 |
unless -O $maybe |
|
201
|
0 |
0 |
unless $perm == 448 |
|
235
|
1 |
1 |
-d "@{[$self->{'home'}];}/.local/bin" ? : |
|
242
|
3 |
3 |
if $self->{'api'} >= 1 |
|
249
|
3 |
3 |
if $self->{'api'} >= 1 |