| line |
true |
false |
branch |
|
53
|
4 |
0 |
unless -e $file |
|
69
|
1 |
3 |
unless $file->[0] == $$ |
|
70
|
0 |
3 |
unless -e $file->[1] |
|
82
|
18 |
11 |
ref $_[0] eq 'SCALAR' ? : |
|
83
|
1 |
28 |
ref $_[0] eq 'HASH' ? : |
|
92
|
2 |
28 |
if (-l $path) |
|
95
|
0 |
2 |
$File::Remove::unlink ? : |
|
|
2 |
0 |
if ($File::Remove::unlink ? &$File::Remove::unlink($path) : unlink($path)) |
|
101
|
3 |
25 |
unless (-e $path) |
|
108
|
25 |
0 |
if (do {
-w $path
}) { } |
|
|
0 |
0 |
elsif ($< == 0) { } |
|
|
0 |
0 |
elsif ((lstat $path)[4] == $<) { } |
|
137
|
0 |
25 |
unless ($can_delete) |
|
143
|
1 |
24 |
if (-f $path) { } |
|
|
24 |
0 |
elsif (-d $path) { } |
|
146
|
0 |
1 |
unless (-w $path) |
|
149
|
0 |
0 |
unless my(undef, undef, $rp) = lstat $path |
|
154
|
0 |
1 |
$File::Remove::unlink ? : |
|
|
1 |
0 |
if ($File::Remove::unlink ? &$File::Remove::unlink($path) : unlink($path)) |
|
157
|
0 |
1 |
if -e $path |
|
170
|
1 |
23 |
if (length $chdir) |
|
172
|
0 |
1 |
unless chdir $chdir |
|
175
|
16 |
8 |
if ($$recursive) { } |
|
177
|
16 |
0 |
if (File::Path::rmtree([$dir], 0, 0)) |
|
180
|
0 |
16 |
if -e $path |
|
190
|
0 |
8 |
$File::Remove::rmdir ? : |
|
|
8 |
0 |
if ($File::Remove::rmdir ? &$File::Remove::rmdir($dir) : rmdir $dir) |
|
193
|
0 |
8 |
if -e $path |
|
218
|
0 |
0 |
if (ref $_[0] eq 'HASH') { } |
|
275
|
28 |
1 |
$opts->{'glob'} ? : |
|
280
|
26 |
8 |
-e $_ ? : |
|
288
|
4 |
24 |
@_ ? : |
|
297
|
0 |
28 |
unless $cv eq $rv |
|
304
|
24 |
4 |
unless (@cd >= @rd) |
|
310
|
1 |
25 |
unless $cd[$_] eq $rd[$_] |