Branch Coverage

blib/lib/File/Remove.pm
Criterion Covered Total %
branch 44 70 62.8


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[$_]