Fehler... aber wo?

[Rob]

hallo zusammen

ich habe da so ein skript geschrieben... leider kam heraus, das folgende Phrase nicht ganz korrekt ist.

if($uebergeben[1] =~ /^movetoend$/)
{
 open(DATEN,"aufgaben.txt");
 @Daten = <DATEN>;
 close(DATEN);
 chomp(@Daten);

open(DATEN,">aufgaben.txt");

$satz = -1;
 for($i = 0; $i < @Daten; $i++)
 {
  if($Daten[$i] =~ /^#0$/ && $satz = -1)
  {
   $satz = $i;
   $i+=2;
  }
  else
  {
   print DATEN "$Daten[$i]\n";
  }
 }

if($satz != -1)
 {
  for($z=$satz;$z<$satz+3;$z++)
  {
   print DATEN "$Daten[$z]\n";
  }
 }
 close(DATEN);
}

weiss jemand warum? finde es nicht, oder ich seh den wald vor lauter bäumen nicht mehr ...

greeze un dmerci rob