| line |
true |
false |
branch |
|
58
|
0 |
0 |
if $Dir::Project::Debug and $Dir::Project::Debug > 1 |
|
69
|
0 |
0 |
unless defined $file |
|
84
|
0 |
0 |
if ($try =~ m[^project/]) |
|
85
|
0 |
0 |
unless defined $Dir::Project::Project |
|
100
|
0 |
0 |
if (-r $ppath) |
|
121
|
0 |
0 |
unless defined $val |
|
142
|
0 |
0 |
unless my $fh = 'IO::File'->new($filename, '>', 438) |
|
174
|
0 |
0 |
unless my $dir = 'IO::Dir'->new($makefile_path) |
|
178
|
0 |
0 |
if $file eq '.' or $file eq '..' |
|
181
|
0 |
0 |
if ($atime - $now > $clean_age) |
|
197
|
0 |
0 |
unless my $func = $Dir::Project::Env_Vars{$envvar} |
|
208
|
0 |
0 |
if (defined $value) { } |
|
236
|
0 |
0 |
if (defined $ENV{$envvar}) |
|
244
|
0 |
0 |
if $Dir::Project::Debug and $envvar eq 'DIRPROJECT' |
|
247
|
0 |
0 |
if $dir =~ m[/homes?/?$] |
|
248
|
0 |
0 |
if (-r "$dir/Project_Root") |
|
253
|
0 |
0 |
if (-r "$dir/$linkfile" and readlink "$dir/$linkfile") |
|
262
|
0 |
0 |
if $Dir::Project::Debug and $envvar eq 'DIRPROJECT' |
|
265
|
0 |
0 |
if $dir =~ m[/homes?/?$] |
|
266
|
0 |
0 |
if (-r "$dir/Project_Root") |
|
271
|
0 |
0 |
if (-r "$dir/$linkfile" and readlink "$dir/$linkfile") |
|
278
|
0 |
0 |
if (defined $default) |
|
289
|
0 |
0 |
if $Dir::Project::Debug |
|
298
|
0 |
0 |
if $file =~ m[^/] |
|
299
|
0 |
0 |
if (readlink $file) |