Sentencia Perl UNLESS...ELSE
Sentencias condicionales en Perl
Una sentencia unless puede ir seguida de una sentencia else opcional. La sentencia else se ejecuta cuando la expresión booleana es true.
Sintaxis
El formato de la sintaxis es el siguiente:
unless(boolean_expression){
# 在布尔表达式 boolean_expression 为 false 执行
}else{
# 在布尔表达式 boolean_expression 为 true 执行
}
Si la expresión booleana boolean_expression es false, se ejecuta el código dentro del bloque unless. Si la expresión booleana es true, se ejecuta el código dentro del bloque else.
Diagrama de flujo
Ejemplo
Ejemplo
#!/usr/bin/perl
$a = 100;
# Usar la sentencia unless para comprobar la expresión booleana
unless( $a == 20 ){
# Se ejecuta cuando la expresión booleana es false
printf "La condición dada es false\n";
}else{
# Se ejecuta cuando la expresión booleana es true
printf "La condición dada es true\n";
}
print "El valor de a es:$a\n";
$a = "";
# Usar la sentencia unless para comprobar la expresión booleana
unless( $a ){
# Se ejecuta cuando la expresión booleana es false
printf "La condición dada de a es false\n";
}else{
# Se ejecuta cuando la expresión booleana es true
printf "La condición dada de a es true\n";
}
print "El valor de a es:$a\n";
Al ejecutar el programa anterior, el resultado es:
给定的条件为 false a 的值为 : 100 a 给定的条件为 false a 的值为 :Otras extensiones