Artikel im Internet unter http://www.hidemail.de/blog/for-perl.shtml.
Montag, 29.1.2007, 11:22:42 Uhr

Schleifen mit for in Perl

Wie in wohl fast jeder Programmiersprache gibt es auch in Perl Schleifen mit for.

Hier der Syntax

for ($i=0;$i<10;$i++){ print "$i ";}

Ausgabe: 0 1 2 3 4 5 6 7 8 9

Dabei gibt der linke Wert den Startwert an, also hier 0, der mittlere Wert gibt das Limit an, also alle Werte für i<10, und schließlich der rechte Wert, der angibt, wie mit der Laufvariable verfahren werden soll. Hier wird sie um eins erhöht.

Eine weitere mögliche Schreibweise wäre auch

for my $i (0..9){ print "$i ";}

Schrittweite != 1
Möglich wäre auch, wenn man eine Schrittweite > 1 haben will,

for ($i=0;$i<10;$i+=3){ print "$i ";}

Ausgabe: 0 3 6 9

Und natürlich kann man auch herunterzählen:

for (my $i=100; $i>=10;$i--){
print "$i ";
last if ($sonstwas);
}

Hier wird von 100 nach 10 heruntergezählt, es sei denn, $sonstwas trifft zu. Dann wird sofort abgebrochen.

Wie bei anderen Schleifen auch sind die Befehle next, redo und last für for-Schleifen möglich.

Artikel im Internet unter http://www.hidemail.de/blog/for-perl.shtml.