nose: Fehler... aber wo?

Beitrag lesen

Hallo auch,
ich muss jetzt auch noch meinen Senf dazu geben:

for($i = 0; $i < @Daten; $i++)
hm. fragwürdig. schreib lieber:
 for($i = 0; $i < $#Daten; $i++)

Gruss,
nose.

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