Ups;-)

Da is' mir beim Bsp. schreiben doch ein kleiner Fehler unterlaufen ;-))

#!/usr/bin/perl
open(NEWDAT, ">>newmail.txt");

open(OLDDAT, "<maildat.txt");
while(<OLDDAT>)
{
  $_ =~  s/HALLO/HALLIHALLO/g;
  print NEWDAT $_;
}
close(OLDDAT);
close(NEWDAT);

So muesste es doch eigentlich funktionieren, oder??
Aber er schreibt immer noch nur eine 10.1kb Datei;-(

Noch eine Idee??