Perl UNLESS 語句

Perl 條件語句 Perl 條件語句

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

語法

語法格式如下所示：

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

如果布爾表達式 boolean_expression為 false，則 unless 語句內(nèi)的代碼塊將被執(zhí)行。如果布爾表達式為 true，則 unless 語句結(jié)束后的第一組代碼（閉括號后）將被執(zhí)行。

流程圖

實例

#!/usr/bin/perl

$a = 20;
# 使用 unless 語句檢測布爾表達式
unless( $a < 20 ){
    # 布爾表達式為 false 時執(zhí)行
    printf "a 大于等于 20\n";
}
print "a 的值為 : $a\n";

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

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

a 大于等于 20
a 的值為 : 20
條件 a 為 false
a 的值為 :

Perl 條件語句 Perl 條件語句