Comment utiliser une instruction switch en Perl

Le langage de programmation Perl a une structure spéciale de contrôle de flux appelé l'instruction switch. L'instruction switch évalue une variable puis exécute une instruction case qui correspond à la variable évaluée. Si aucune déclaration de cas correspondant est trouvé, un cas de défaut est exécutée. états de commutation sont utiles pour le branchement à l'un des nombreux chemins d'exécution possibles. Il est l'une des structures de contrôle de base communs à de nombreux langages de programmation. Vous pouvez apprendre à écrire une instruction switch en Perl en seulement quelques minutes.

Instructions

1 Créez un nouveau fichier texte en utilisant un traitement de texte tel que Notepad. Enregistrez le fichier en utilisant l'extension .plx.

2 Ouvrez une invite de commande et accédez au dossier où vous avez enregistré le fichier créé à l'étape 1. Par exemple, si vous avez enregistré votre fichier à la racine de votre lecteur C: \ Windows, vous pouvez taper la commande suivante à une invite de commande:

cd C: \

3 Importez le module de commutation par écrit la déclaration suivante en haut du fichier de code source:

utiliser Switch;

4 Déclarez une variable et lui attribuer une valeur, comme ceci:

$ Val = 1;

5 Créer une instruction switch qui évalue la variable déclarée dans la déclaration précédente. Par exemple, vous pouvez écrire l'instruction switch suivante:

switch ($ val)
{
}

6 Créer une déclaration de cas qui exécute lorsque la variable $ val correspond à une valeur spécifique. Toutes les déclarations de cas doivent aller à l'intérieur des accolades de l'instruction switch. Pour créer une instruction case qui exécute quand $ val est égal à 1 et imprime le mot One, écrivez ce qui suit:

cas 1 {print "One"}

7 Créer quelques déclarations de cas, comme celui-ci:

cas 2 {print "Two"}
cas 3 {print "Trois"}

8 Créer une déclaration de cas de défaut qui exécute lorsque la variable $ val ne correspond à aucune autre déclaration de cas. Ceci peut être accompli en utilisant le mot-clé else, comme ceci:

else {print "Cas par défaut"}

9 Exécutez le script Perl en exécutant la commande suivante à partir de la ligne de commande, en remplaçant le nom que vous avez choisi à l'étape 1 pour "filename":

perl filename.plx

dix Examinez la sortie. Depuis $ val est attribuée la valeur 1, la sortie ressemble à ceci:

Un