Perl-Switch-Anweisung

Autor：Eve Cole Aktualisierungszeit：2024-12-24 17:12:01

Eine Switch- Anweisung ermöglicht das Testen einer Variablen, die mehreren Werten entspricht. Jeder Wert wird als Fall bezeichnet, und die getestete Variable wird für jeden Schalterfall überprüft.

Die Switch-Case-Ausführung basiert auf dem Switch- Modul, das standardmäßig nicht installiert ist.

Installieren Sie das Switch.pm-Modul

Installation mit CPAN

Öffnen Sie ein Befehlsfenster, geben Sie den Befehl cpan und dann den Befehl install Switch ein:

 # cpancpan[1]> install Switch // Install cpan[2]> exit // Exit

Ubuntu-Installation mit apt-get

 sudo apt-get install libswitch-perl

Grammatik

Das Syntaxformat ist wie folgt:

Grammatik

verwende Switch ; switch ( Argument ) { Fall 1 { drucken „ Nummer 1 “ } Fall " A " { drucken „ Zeichenfolge a “ } Fall [ 1..10,42 ] { drucken „ Die Nummern sind in der Liste “ } Fall ( @array ) { drucken „ Zahlen im Array “ } Fall / w+ / { drucken „ regelmäßiges passendes Muster “ } Fall qr /w+/ { p r int „ regelmäßiges passendes Muster “ } Fall ( %hash ) { drucken „ Hash “ } Fall ( & sub ) { drucken „ Kindprozess “ } anders { drucken „ Entspricht nicht der vorherigen Bedingung “ } }

Im Folgenden sind die Regeln für switch-Anweisungen aufgeführt:

In den Klammern einer Switch -Anweisung können Skalarparameter jeden Typs verwendet werden.

In einem Schalter können beliebig viele Case-Anweisungen vorhanden sein. Auf jeden Fall folgen ein zu vergleichender Wert und ein Doppelpunkt.

Der Skalar nach der case-Anweisung wird mit dem Skalar in der switch-Anweisung verglichen, um festzustellen, ob sie gleich sind.

Wenn die getestete Variable der Konstante im Fall entspricht, werden die auf den Fall folgenden Anweisungen ausgeführt, bis die Break -Anweisung auftritt.

Die switch -Anweisung kann am Ende eine optionale else -Anweisung haben, die ausgeführt wird, wenn nicht alle Fälle übereinstimmen.

Wenn der Fall übereinstimmt, wird der Blockcode der Case-Anweisung ausgeführt und die Switch-Anweisung springt nach der Ausführung heraus.

Wenn wir nach dem Abgleichen des Falls mit der Ausführung der nächsten Case-Anweisung fortfahren müssen, müssen wir eine nächste Anweisung hinzufügen.

Flussdiagramm

Beispiel

#!/usr/bin/perl use Switch ; $ var = ( 10 , 20 , 30 ) ; % hash = ( ' key1 ' = > 20 ) { Fall 10 { drucken " Nummer 10 n " } Fall " A " { drucken „ Zeichenfolge a “ } Fall [ 1..10,42 ] { drucken „ Die Nummern sind in der Liste “ } Fall ( @array ) { drucken „ Zahlen im Array “ } Fall ( %hash ) { drucken „ im Hash “ } anders { drucken „ Keine passende Bedingung “ } }

Wenn Sie das obige Programm ausführen, lautet das Ausgabeergebnis:

 Nummer 10

Schauen wir uns als Nächstes ein Beispiel für die Verwendung von next an:

Beispiel

#!/usr/bin/perl use Switch ; $ var = ( 10 , 20 , 30 ) ; % hash = ( ' key1 ' = > 10 , ' key2 ' = > 20 ) ; Fall 10 { drucken „ Nummer 10 n “ ; # Ausführung nach dem Abgleich fortsetzen Fall " A " { drucken „ Zeichenfolge a “ } Fall [ 1..10,42 ] { drucken „ Die Nummern sind in der Liste “ } Fall ( @array ) { drucken „ Zahlen im Array “ } Fall ( %hash ) { drucken „ im Hash “ } anders { drucken „ Keine passende Bedingung “ } }

Wenn Sie das obige Programm ausführen, lautet das Ausgabeergebnis:

 Nummer 10 Nummern in der Liste