Stefan Priebe: Kann man Dateien nach einem bestimmten Zeitraum löschen ?

Beitrag lesen

Hier die Lösung:
$verzeichnis = "ips";
$tage = 2;

opendir(CARDDIR, "$verzeichnis");
  @items = grep(/[0-9]$EXT/,readdir(CARDDIR));
  closedir(CARDDIR);
  foreach $item (@items)
   {
    if (-M "$verzeichnis/$item" > $tage)
     {
      unlink("$verzeichnis/$item");
     }
   }