Nur aktuelle Dateien aus Verzeichnis bearbeiten

[Struppi]

Hallo Klaus

http://de.selfhtml.org/perl/funktionen/dateiverwaltung.htm#dateitest oder http://de.selfhtml.org/perl/funktionen/dateiverwaltung.htm#stat

Hi Struppi,
soweit war ich schon. Ich hab es mit -M versucht. Das ging nicht. So sieht mein Code aus:

#!/usr/local/bin/perl
$dir = '/daten/beitraege';

opendir(DIR, $dir);
   my @Eintraege = readdir(DIR);

chdir("/pr/ibr/daten/beitraege/");
   my @Grosse_Dateien = grep(-M lt "0.8", @Eintraege);
   while (defined($filename = readdir(DIR)))
   {
   @Daten_alt = ("");
   $Daten_neu = "";
  foreach("/pr/ibr/daten/beitraege/$filename" eq "@Grosse_Dateien")
  {
.
.
   }
   }
  close(PASSWD);

  
Dieser Code läuft bei mir gar nicht, schau dir mal an was opendir, readir machen. Ich kann auch nicht so richtig nachvollziehen was du da vor hast, das foreach(...) Konstrukt ist mir neu, was passiert da?  
  
Struppi.

-- 
[Javascript ist toll](http://javascript.jstruebig.de/)