Instructions conditionnelles Perl - IF ... ELSE

Les instructions conditionnelles Perl aident à la prise de décision, qui nécessitent que le programmeur spécifie une ou plusieurs conditions à évaluer ou tester par le programme, ainsi qu'une ou plusieurs instructions à exécuter si la condition est jugée vraie, et éventuellement d'autres instructions à exécuter si la condition est jugée fausse.

Voici le général d'une structure de prise de décision typique trouvée dans la plupart des langages de programmation -

Le nombre 0, les chaînes '0' et "", la liste vide () et undef sont tous false dans un contexte booléen et toutes les autres valeurs sont true. Négation d'une vraie valeur par! ou not renvoie une valeur fausse spéciale.

Le langage de programmation Perl fournit les types suivants d'instructions conditionnelles.

N ° Sr.	Déclaration et description
1	if déclaration Un if statement se compose d'une expression booléenne suivie d'une ou plusieurs instructions.
2	if ... instruction else Un if statement peut être suivi d'une option else statement.
3	instruction if ... elsif ... else Un if statement peut être suivi d'une option elsif statement puis par un optionnel else statement.
4	sauf déclaration Un unless statement se compose d'une expression booléenne suivie d'une ou plusieurs instructions.
5	sauf ... instruction else Un unless statement peut être suivi d'une option else statement.
6	sauf ... instruction elsif..else Un unless statement peut être suivi d'une option elsif statement puis par un optionnel else statement.
sept	instruction switch Avec les dernières versions de Perl, vous pouvez utiliser le switchdéclaration. qui permet un moyen simple de comparer une valeur de variable à diverses conditions.

Le ? : Opérateur

Vérifions le conditional operator ? :qui peut être utilisé pour remplacer if...elsedéclarations. Il a la forme générale suivante -

Exp1 ? Exp2 : Exp3;

Où Exp1, Exp2 et Exp3 sont des expressions. Notez l'utilisation et le placement des deux points.

La valeur d'un? expression est déterminée comme ceci: Exp1 est évalué. Si c'est vrai, alors Exp2 est évalué et devient la valeur de l'ensemble? expression. Si Exp1 est faux, Exp3 est évalué et sa valeur devient la valeur de l'expression. Voici un exemple simple utilisant cet opérateur -

#!/usr/local/bin/perl
 
$name = "Ali";
$age = 10;

$status = ($age > 60 )? "A senior citizen" : "Not a senior citizen";

print "$name is  - $status\n";

Cela produira le résultat suivant -

Ali is - Not a senior citizen