Perl salvo declaración

Una perl unless declaración consta de una expresión booleana seguida de una o más declaraciones.

Sintaxis

La sintaxis de una declaración a menos que en el lenguaje de programación Perl es:

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

Si la expresión booleana se evalúa como false, luego se ejecutará el bloque de código dentro de la instrucción a menos que. Si la expresión booleana se evalúa comotrue entonces se ejecutará el primer conjunto de código después del final de la instrucción a menos (después de la llave de cierre).

El número 0, las cadenas '0' y "", la lista vacía () y undef son todos false en un contexto booleano y todos los demás valores son true. Negación de un valor verdadero por! o not devuelve un valor falso especial.

Diagrama de flujo

Ejemplo

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

Primero, a menos que la instrucción utilice el operador menor que (<), que compara dos operandos y si el primer operando es menor que el segundo, entonces devuelve verdadero; de lo contrario, devuelve falso. Entonces, cuando se ejecuta el código anterior, produce el siguiente resultado:

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