Sergej: Ermitteln ob ein Array-Element existiert, wenn nicht anhängen...

Beitrag lesen

Hallo Phil,

TimeAbstd sei eine Konstante? - Hat zwar nix mit Endlosschleife zu >>tun, aber Konstanten
werden GROSS geschrieben und wie definierst du sie?

use constant TimeAbstd  => 5;
__________________________________________________________
Bildschirmausgabe:

13843
13844
13845
13846
13847   <<==die letzte eingelesene Zeile in einem Array @zeile

2 -- 1231 <<== Ausgabe $i -- $j
 17 -- 1434 <<== Ausgabe $i -- $j
!!! Ab hier bleibt er stehen
__________________________________________________________

An der Größe kanns nicht liegen.
Im Ausgabefile sind 0 Byte, hatte schon mal 150 MB ;-)

ich denke hier ist was Falsch:

if ($anfuegen) {
  push (@vorhanden, $Msg[$j]);
  print FHout $zeile[$i];
  print FHout $zeile[$j]."\n";
  print "\n $i -- $j \n";
  }
Danke.
Gruß Sergej