große Files öffnen?

[Cheatah]

Hi,

wie Calocybe schon sagt sind Dir die Handles durcheinandergeraten. Ich erlaube mir mal eine Korrektur mit gleichzeitiger Optimierung:

open(NEWDAT, ">newdat.txt");
print NEWDAT "Neue Datei\n";

open(OLDDAT, "<olddat.txt");
while(<OLDDAT>)

»»  {

s/\HALLO\b/HALLIHALLO/g;
  print NEWDAT $_;

»»  }

close(OLDDAT);
close(NEWDAT);

Cheatah