Perl UNLESS 语句

Perl 条件语句 Perl 条件语句

一个 unless 语句由一个布尔表达式后跟一个或多个语句组成。

语法

语法格式如下所示：

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

如果布尔表达式 boolean_expression为 false，则 unless 语句内的代码块将被执行。如果布尔表达式为 true，则 unless 语句结束后的第一组代码（闭括号后）将被执行。

流程图

实例

#!/usr/bin/perl

$a = 20;
# 使用 unless 语句检测布尔表达式
unless( $a < 20 ){
    # 布尔表达式为 false 时执行
    printf "a 大于等于 20\n";
}
print "a 的值为 : $a\n";

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

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

a 大于等于 20
a 的值为 : 20
条件 a 为 false
a 的值为 :

Perl 条件语句 Perl 条件语句