Perl не ПОКА ... Else

Perl условные операторы

Если позднее заявление с дополнительным заявлением другое, иначе оператор не выполняет логическое выражение истинно.

грамматика

Синтаксис выглядит следующим образом:

unless(boolean_expression){
   # 在布尔表达式 boolean_expression 为 false 执行
}else{
   # 在布尔表达式 boolean_expression 为 true 执行
}

Boolean_expression Если логическое выражение ложно, если код в пределах выполнения блока. Если логическое выражение истинно, то код внутри блока остальное выполняется.

технологическая схема

примеров

#!/usr/bin/perl

$a = 100;
# 使用 unless 语句检测布尔表达式
unless( $a == 20 ){
    # 布尔表达式为 false 时执行
    printf "给定的条件为 false\n";
}else{ 
    # 布尔表达式为 true 时执行
    printf "给定的条件为 true\n";
}
print "a 的值为 : $a\n";

$a = "";
# 使用 unless 语句检测布尔表达式
unless( $a ){
    # 布尔表达式为 false 时执行
    printf "a 给定的条件为 false\n";
}else{
   # 布尔表达式为 true 时执行
    printf "a 给定的条件为 true\n";
}
print "a 的值为 : $a\n";

Вышеприведенная программа, выход:

给定的条件为 false
a 的值为 : 100
a 给定的条件为 false
a 的值为 : 

Perl условные операторы