Perl UNLESS ... ELSE dichiarazione

Un Perl unless L'istruzione può essere seguita da un opzionale else istruzione, che viene eseguita quando l'espressione booleana è vera.

Sintassi

La sintassi di un file unless...else dichiarazione nel linguaggio di programmazione Perl è -

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

Se l'espressione booleana restituisce true poi il unless block di codice verrà eseguito altrimenti else block di codice verrà eseguito.

Il numero 0, le stringhe "0" e "", l'elenco vuoto () e undef sono tutti false in un contesto booleano e tutti gli altri valori lo sono true. Negazione di un valore reale da parte di! o not restituisce un valore falso speciale.

Diagramma di flusso

Esempio

#!/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";

Quando il codice sopra viene eseguito, produce il seguente risultato:

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