Perl next-Anweisung
Die Perl next-Anweisung wird verwendet, um die Ausführung von Anweisungen ab der auf die next-Anweisung folgenden Anweisung bis zum Bezeichner für das Ende des Schleifenkörpers zu stoppen, dann die Ausführung an den continue-Block zu übergeben und anschließend zum Anfang des Schleifenkörpers zurückzukehren, um die nächste Iteration zu starten.
Syntax
Das Syntaxformat lautet wie folgt:
next [ LABEL ];
LABEL ist optional. Wenn LABEL nicht angegeben ist, kehrt die nächste Anweisung zum Anfang des Schleifenkörpers zurück und startet die nächste Iteration.
Beispiel
#!/usr/bin/perl
$a = 10;
while( $a < 20 ){
if( $a == 15)
{
# Diese Iteration überspringen
$a = $a + 1;
next;
}
print "Der Wert von a ist:$a\n";
$a = $a + 1;
}
Das Ausführen des obigen Programms erzeugt die folgende Ausgabe:
a 的值为: 10 a 的值为: 11 a 的值为: 12 a 的值为: 13 a 的值为: 14 a 的值为: 16 a 的值为: 17 a 的值为: 18 a 的值为: 19Weitere Erweiterungen
Perl-Schleifen