Hab hier mal ein Auszug von dem wie es etwa bei mir aussieht:
sysopen (DATEI, $data2 , O_RDONLY);
while(<DATEI>)
{
#Felder definieren, korregieren usw...
if ($feld1 <= $dat1) #1er Block
{push(@NeueZeilen,$neu);}
else # Block 1 zuende
{$pos = tell (DATEI); close (DATEI);}
}
Du pushst hier evtl. 900MB in den Speicher. Warum?
Du kannst ohne Probleme zwei Dateien gleichzeitig öffnen (oder mehr), eine zum lesen und eine zum schreiben.
Struppi.