Perl UNLESS...ELSE 语句 - Perl 基础教程

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

unless 语句语法格式

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

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

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

unless...else 语句流程图

Perl 中的 unless...else 语句流程图如下

范例 : Perl 中 unless...else 的使用

#!/usr/bin/perl

=pod

  file: mail.pl
  author: 简单教程(www.twle.cn)

  Copyright © 2015-2065 www.twle.cn. All rights reserved.

=cut


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

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

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

$ perl main.pl
给定的条件为 false
step 的值为 : 28
step 给定的条件为 false
step 的值为 :