Perl 條件語句
我們可以在 Perl 中使用條件語句。那麼,什麼是條件語句呢?條件語句是那些你實際檢查程式碼中是否滿足某些情況的語句。
Perl 支援兩種型別的條件語句;他們是 if
和 else
。
Perl if
如果條件為真,則執行程式碼塊。
my $a=5;
if($a==5)
{
print "The value is $a";
}
輸出:
The value is 5
Perl if else
讓我們考慮下 $a
不是 5 的情況。
my $a=10;
if($a==5)
{
print "The values is $a ---PASS";
}
else
{
print "The value is $a ---FAIL";
}
輸出:
The value is 10 ---FAIL
這樣我們一次只能控制一個條件。這是一個限制嗎?不,你還可以使用 if ... elsif ... else
來控制各種條件。
Perl elsif
my $a=5;
if($a==6)
{
print "Executed If block -- The value is $a";
}
elsif($a==5)
{
print "Executed elsif block --The value is $a";
}
else
{
print "Executed else block – The value is $a";
}
輸出:
Executed elsif block --The value is 5
在上面的例子中,elsif
塊將被執行,因為 $a
等於 5
。
可能存在 if
和 elsif
程式碼塊都將失敗的情況。在這種情況下,將執行 else
程式碼塊。
Perl 巢狀條件語句
在這種情況下,你可以在 if
程式碼塊中巢狀 if
程式碼塊。
my $a=11; #Change values to 11,2,5 and observe output
if($a<10){
print "Inside 1st if block";
if($a<5){
print "Inside 2nd if block --- The value is $a";
}
else{
print " Inside 2nd else block --- The value is $a";
}
}
else{
print "Inside 1st else block – The value is $a";
}
輸出:
Inside 1st else block – The value is 11
Perl unless
你已經學會了 if
條件判斷結構,(如果條件為真,它將執行程式碼塊)。unless
與 if
相反,如果條件為 false
則將執行程式碼塊。
my $a=5;
unless($a==5)
{
print "Inside the unless block --- The value is $a";
}
else
{
print "Inside else block--- The value is $a";
}
輸出:
Inside 1st else block – The value is 5
輸出將是 else
塊的 print
語句。
使用 if
的例子
$a= " This is Perl";
if($a eq "SASSDSS"){
print "Inside If Block";
}
else
{
print "Inside else block"
}
輸出:
Inside else block
使用 unless
的例子
$a= " This is Perl";
unless($a eq "SASSDSS"){
print "Inside unless Block";
}
else
{
print "Inside else block"
}
輸出:
Inside unless Block