Perl UNLESS...ELSE 語句

Perl 條件語句

一個 unless 語句 後可跟一個可選的 else 語句，else 語句在布爾運算式為 true 時執行。

語法

語法格式如下所示：

unless(boolean_expression){
   # 在布爾運算式 boolean_expression 為 false 執行
}else{
   # 在布爾運算式 boolean_expression 為 true 執行
}

如果布爾運算式 boolean_expression 為 false，則執行 unless 塊內的代碼。如果布爾運算式為 true，則執行 else 塊內的代碼。

流程圖

實例

#!/usr/bin/perl

$a = 100;
# 使用 unless 語句檢測布爾運算式

unless( $a == 20 ){
    # 布爾運算式為 false 時執行

    printf "給定的條件為 false\n";
}else{
    # 布爾運算式為 true 時執行

    printf "給定的條件為 true\n";
}
print "a 的值為 : $a\n";

$a = "";
# 使用 unless 語句檢測布爾運算式

unless( $a ){
    # 布爾運算式為 false 時執行

    printf "a 給定的條件為 false\n";
}else{
   # 布爾運算式為 true 時執行

    printf "a 給定的條件為 true\n";
}
print "a 的值為 : $a\n";

執行以上程式，輸出結果為：

給定的條件為 false
a 的值為 : 100
a 給定的條件為 false
a 的值為 :

Perl 條件語句