Perl UNLESS...ELSE 語句

Perl 條件語句 Perl 條件語句

一個(gè) unless 語句 后可跟一個(gè)可選的 else 語句，else 語句在布爾表達(dá)式為 true 時(shí)執(zhí)行。

語法

語法格式如下所示：

unless(boolean_expression){
   # 在布爾表達(dá)式 boolean_expression 為 false 執(zhí)行
}else{
   # 在布爾表達(dá)式 boolean_expression 為 true 執(zhí)行
}

如果布爾表達(dá)式 boolean_expression 為 false，則執(zhí)行 unless 塊內(nèi)的代碼。如果布爾表達(dá)式為 true，則執(zhí)行 else 塊內(nèi)的代碼。

流程圖

實(shí)例

#!/usr/bin/perl

$a = 100;
# 使用 unless 語句檢測布爾表達(dá)式
unless( $a == 20 ){
    # 布爾表達(dá)式為 false 時(shí)執(zhí)行
    printf "給定的條件為 false\n";
}else{ 
    # 布爾表達(dá)式為 true 時(shí)執(zhí)行
    printf "給定的條件為 true\n";
}
print "a 的值為 : $a\n";

$a = "";
# 使用 unless 語句檢測布爾表達(dá)式
unless( $a ){
    # 布爾表達(dá)式為 false 時(shí)執(zhí)行
    printf "a 給定的條件為 false\n";
}else{
   # 布爾表達(dá)式為 true 時(shí)執(zhí)行
    printf "a 給定的條件為 true\n";
}
print "a 的值為 : $a\n";

執(zhí)行以上程序，輸出結(jié)果為：

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

Perl 條件語句 Perl 條件語句