Siechfred: zeilenweises Einlesen einer Datei mit while

Beitrag lesen

Hallo Philipp,

also ich versuche es jetzt mal so (sitze im Büro und warte auf meinen nächsten Termin, der sich etwas verspätet, deshalb diese Art von Trockenübung):

open(LOGFILE, "+>datei") or die $!;
while(<LOGFILE>) {
  ($ip, $zeit) = split(/|/, $_);
  if($aktuelle_zeit - $zeit > $zeitabstand * 60) {
    push(@neue_zeilen, $_);
  }
}
print LOGFILE @neue_zeilen;
close(LOGFILE);

Meintest du das so?

mfg Torsten