<?

$dir = "/home/hendrik/streams";

error_reporting(E_ALL & ~E_NOTICE);

$handle=opendir($dir);
while ($file = readdir ($handle)) {
    if($file != "." && $file != "..") {
       $files[] = $file;
    }
}
closedir($handle);

foreach($files AS $key => $file) {
   if(fileatime($dir."/".$file) < time() - 3600*24) {
      echo("OLD: $file\n");
      unlink($dir."/".$file);
      unset($files[$key]);
   }
}

foreach($files AS $key => $file) {
   foreach($files AS $simkey => $simfile) {
      if($key != $simkey) {
         similar_text(strtolower($file), strtolower($simfile), $perc);
         if($perc > 95) {
            echo("$file and $simfile are the same\n");
            if(@fileatime($dir."/".$file) > @fileatime($dir."/".$simfile)) {
               echo("DEL: $simfile\n");
               @unlink($dir."/".$simfile);
               unset($files[$simkey]);
            }
            else {
               echo("DEL: $file\n");
               @unlink($dir."/".$file);
               unset($files[$key]);
               break;
            }
         }
      }
   }
}


?>