Perl UNLESS…ELSE 语句

一个 unless 语句 后可跟一个可选的 else 语句，else 语句在布尔表达式为 true 时执行。

语法

语法格式如下所示：

  1. unless(boolean_expression){
  2.    # 在布尔表达式 boolean_expression 为 false 执行
  3. }else{
  4.    # 在布尔表达式 boolean_expression 为 true 执行
  5. }

如果布尔表达式 boolean_expression 为 false，则执行 unless 块内的代码。如果布尔表达式为 true，则执行 else 块内的代码。

流程图

Perl UNLESS...ELSE 语句 - 图1

实例

  1. #!/usr/bin/perl
  3. $a = 100;
  4. # 使用 unless 语句检测布尔表达式
  5. unless( $a == 20 ){
  6.     # 布尔表达式为 false 时执行
  7.     printf "给定的条件为 false\n";
  8. }else{ 
  9.     # 布尔表达式为 true 时执行
  10.     printf "给定的条件为 true\n";
  11. }
  12. print "a 的值为 : $a\n";
  14. $a = "";
  15. # 使用 unless 语句检测布尔表达式
  16. unless( $a ){
  17.     # 布尔表达式为 false 时执行
  18.     printf "a 给定的条件为 false\n";
  19. }else{
  20.    # 布尔表达式为 true 时执行
  21.     printf "a 给定的条件为 true\n";
  22. }
  23. print "a 的值为 : $a\n";

执行以上程序，输出结果为：

  1. 给定的条件为 false
  2. a 的值为 : 100
  3. a 给定的条件为 false
  4. a 的值为 :