Perl (bedingte Schleifen)

bedingte Schleifen

while ( $variable operator $variable/"Wert" )
{
  ...
}

Die Schleife wird wiederholt, solange die übergebene Bedingung wahr
ist.

Beispiel:
$zahl=42;
while ( $zahl != 336 )
{
  print $zahl."\n";
  $zahl=$zahl*2;
}

Ausgabe:
42
84
168