47、Perl UNLESS 语句

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

unless 语句语法格式

Perl 中的 unless 语句语法格式如下：

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

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

unless 语句流程图

Perl 中 unless 语句流程图如下

范例 ： Perl 中的 unless 语句使用

#!/usr/bin/perl

=pod

  file: mail.pl
  author: DDKK.COM 弟弟快看，程序员编程资料站(www.ddkk.com)

  Copyright © 2015-2065 www.ddkk.com. All rights reserved.

=cut

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

print "age 的值为 : $age\n";

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

运行以上范例，输出结果为:

$ perl main.pl
age 的值为 : 18
条件 age 为 false
age 的值为 :