這期內(nèi)容當(dāng)中小編將會給大家?guī)碛嘘P(guān)如何進(jìn)行perl控制結(jié)構(gòu)學(xué)習(xí)，文章內(nèi)容豐富且以專業(yè)的角度為大家分析和敘述，閱讀完這篇文章希望大家可以有所收獲。
一.條件判斷
if ( )
{
}
elsif ( )
{
}
...
else
{
}
實(shí)例
#!/usr/bin/perl
use strict;
use warnings;
my $in =
chomp($in);
if($in>90){ #如果輸入數(shù)字大于90 則大于 $IN>a
print '$in>a';
}else{ #否則打印$IN
print '$in
}
二.循環(huán)
1.while循環(huán)
while ( )
{
}
2.until循環(huán) #條件為假是執(zhí)行循環(huán)
until ( )
{
}
實(shí)例
#!/usr/bin/perl
use strict;
use warnings;
my $i = 1; my $j = 10;
until($i>$j){ #$i>$j 此處條件為假
$i++;
print "Hello\n";
}
打印結(jié)果
---------- Perl ----------
2
3
4
5
6
7
8
9
10
11
Output completed (0 sec consumed) - Normal Termination
結(jié)論從打印結(jié)果可以看出 只要until循環(huán)滿足 判斷條件為假 執(zhí)行條件真時結(jié)束循環(huán)。實(shí)例可以看出 當(dāng)$i =11 時 $i>$j 條件為真 結(jié)束循環(huán)。
3.類C的for循環(huán)
for ($count=1; $count <= 5; $count++)
{
#statements inside the loop go here
}
4.針對列表(數(shù)組)每個元素的foreach循環(huán)
foreach localvar (listexpr)
{
statement_block;
}
注:
(1)此處的循環(huán)變量localvar是個局部變量,如果在此之前它已有值,則循環(huán)后仍恢復(fù)該值.
(2)在循環(huán)中改變局部變量,相應(yīng)的數(shù)組變量也會改變.
例:
foreach $word (@words)
{
if ($word eq "the")
{
print ("found the word 'the'\n");
}
}
此外,如果localvar省略了的話,PERL將使用默認(rèn)變量$_.
例:
@array = (123, 456, 789);
foreach (@array)
{
print $_;
}
$_是PERL最常使用的默認(rèn)變量,上例中print后面的$_也可以去掉,當(dāng)print沒有參數(shù)時,會默認(rèn)輸出$_變量.
5.do循環(huán)
do
{
statement_block
} while_or_until(condexpr);
do循環(huán)至少執(zhí)行一次循環(huán).
6.循環(huán)控制
退出循環(huán)為last,與C中的break作用相同;
執(zhí)行下一個循環(huán)為next,與C中的continue作用相同;
PERL特有的一個命令是redo,其含義是重復(fù)此次循環(huán),即循環(huán)變量不變,回到循環(huán)起始點(diǎn).但要注意,redo命令在do循環(huán)中不起作用.
三.單行條件
語法為statement keyword condexpr.其中keyword可為if, unless, while或until.例如:
print ("This is zero.\n") if ($var == 0);
print ("This is zero.\n") unless ($var != 0);
print ("Not zero yet.\n") while ($var-- > 0);
print ("Not zero yet.\n") until ($var-- == 0);
雖然條件判斷寫在后面，但卻是先執(zhí)行的。
上述就是小編為大家分享的如何進(jìn)行perl控制結(jié)構(gòu)學(xué)習(xí)了，如果剛好有類似的疑惑，不妨參照上述分析進(jìn)行理解。如果想知道更多相關(guān)知識，歡迎關(guān)注創(chuàng)新互聯(lián)行業(yè)資訊頻道。
另外有需要云服務(wù)器可以了解下創(chuàng)新互聯(lián)cdcxhl.cn，海內(nèi)外云服務(wù)器15元起步，三天無理由+7*72小時售后在線，公司持有idc許可證，提供“云服務(wù)器、裸金屬服務(wù)器、高防服務(wù)器、香港服務(wù)器、美國服務(wù)器、虛擬主機(jī)、免備案服務(wù)器”等云主機(jī)租用服務(wù)以及企業(yè)上云的綜合解決方案，具有“安全穩(wěn)定、簡單易用、服務(wù)可用性高、性價比高”等特點(diǎn)與優(yōu)勢，專為企業(yè)上云打造定制，能夠滿足用戶豐富、多元化的應(yīng)用場景需求。
重慶分公司
重慶分公司
