Perl a meno che Statement

Un Perl unless istruzione consiste in un'espressione booleana seguita da una o più istruzioni.

Sintassi

La sintassi di un'istruzione a meno nel linguaggio di programmazione Perl è:

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

Se l'espressione booleana restituisce false, quindi verrà eseguito il blocco di codice all'interno dell'istruzioneless. Se l'espressione booleana restituiscetrue quindi verrà eseguita la prima serie di codice dopo la fine dell'istruzioneless (dopo la parentesi graffa di chiusura).

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 = 20;
# check the boolean condition using unless statement
unless( $a < 20 ) {
   # if condition is false then print the following
   printf "a is not less than 20\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";
}
print "value of a is : $a\n";

Primo, a meno che l'istruzione non utilizzi l'operatore minore di (<), che confronta due operandi e se il primo operando è minore del secondo, restituisce true altrimenti restituisce false. Quindi, quando il codice sopra viene eseguito, produce il seguente risultato:

a is not less than 20
value of a is : 20
a has a false value
value of a is :