line |
true |
false |
branch |
14
|
0 |
2 |
unless (defined $$self{'prefix'}) |
42
|
3 |
5 |
if (scalar @found > 0) |
71
|
1 |
8 |
if (not $_ =~ /^$prefix/ and $_ =~ m[^[^\$\/]]) |
90
|
1 |
2 |
if ($_ ne $env) |
109
|
0 |
0 |
if (open CSH, ">$csh_file") { } |
119
|
0 |
0 |
if (open SH, ">$sh_file") { } |
148
|
1 |
10 |
if ($$self{'utok'}{$_}) { } |
159
|
1 |
10 |
if ($$self{'utok'}{$_}) { } |
167
|
5 |
0 |
if ($export ne 'export ') |
185
|
2 |
6 |
if ($_ eq 'PATH') { } |
192
|
1 |
7 |
if ($$self{'utok'}{$_}) |
193
|
1 |
0 |
if ($delimiter ne ':') { } |
202
|
2 |
8 |
if ($_ eq 'PATH' and $item eq '$PATH') { } |
210
|
1 |
7 |
if ($$self{'utok'}{$_}) { } |
216
|
2 |
6 |
if ($_ eq 'PATH') |
238
|
0 |
9 |
if (-l $$self{'prefix'}) { } |
267
|
8 |
91 |
if (/^$find$/ and -d $_) |
270
|
2 |
9 |
if ($File::Find::name =~ m[/$skip/]) |