Don't follow symlinks.
This commit is contained in:
parent
8134befe68
commit
ab63c481af
|
@ -35,7 +35,7 @@ sub waste {
|
||||||
$filename = $dir . "/" . $i;
|
$filename = $dir . "/" . $i;
|
||||||
($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size,
|
($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size,
|
||||||
$atime,$mtime,$ctime,$blksize,$blocks) =
|
$atime,$mtime,$ctime,$blksize,$blocks) =
|
||||||
stat($filename);
|
lstat($filename);
|
||||||
|
|
||||||
if (-d _) {
|
if (-d _) {
|
||||||
($size, $mtime, $atime) = waste($filename);
|
($size, $mtime, $atime) = waste($filename);
|
||||||
|
|
Loading…
Reference in New Issue