Instruction Perl UNLESS ... ELSE

Un Perl unless l'instruction peut être suivie d'une instruction facultative else instruction, qui s'exécute lorsque l'expression booléenne est vraie.

Syntaxe

La syntaxe d'un unless...else l'instruction en langage de programmation Perl est -

unless(boolean_expression) {
   # statement(s) will execute if the given condition is false
} else {
   # statement(s) will execute if the given condition is true
}

Si l'expression booléenne est évaluée à true puis le unless block du code sera exécuté sinon else block du code sera exécuté.

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.

Représentation schématique

Exemple

#!/usr/local/bin/perl
 
$a = 100;
# check the boolean condition using unless statement
unless( $a == 20 ) {
   # if condition is false then print the following
   printf "given condition is false\n";
} else { 
   # if condition is true then print the following
   printf "given condition is true\n";
}
print "value of a is : $a\n";

$a = "";
# check the boolean condition using unless statement
unless( $a ) {
   # if condition is false then print the following
   printf "a has a false value\n";
} else {
   # if condition is true then print the following
   printf "a has a true value\n";
}
print "value of a is : $a\n";

Lorsque le code ci-dessus est exécuté, il produit le résultat suivant -

given condition is false
value of a is : 100
a has a false value
value of a is :