nicht angemeldet
Hi,
my($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size, $atime,$mtime,$ctime,$blksize,$blocks) = stat($filename);
es ist mir ein Rätsel, warum sich diese Mär, man müsse für jede noch so kleine Information stat benutzen, so hartnäckig hält:
perldoc -f -X
[...]
-M Age of file in days when script started.
-A Same for access time.
-C Same for inode change time.
Prüf also einfach auf -C $file > 3.
Cheatah