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 的值为 :