Perl UNLESS 語句

Perl條件語句

一個unless 語句由一個布爾表達式後跟一個或多個語句組成。

語法

語法格式如下所示：

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

如果布爾表達式boolean_expression為false，則if 語句內的代碼塊將被執行。 如果布爾表達式為true，則if 語句結束後的第一組代碼（閉括號後）將被執行。

流程圖

實例

#!/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條件語句