這篇文章主要介紹Perl控制結(jié)構(gòu)有哪些，文中介紹的非常詳細(xì)，具有一定的參考價(jià)值，感興趣的小伙伴們一定要看完！

創(chuàng)新互聯(lián)公司堅(jiān)持“要么做到，要么別承諾”的工作理念，服務(wù)領(lǐng)域包括：網(wǎng)站建設(shè)、網(wǎng)站設(shè)計(jì)、企業(yè)官網(wǎng)、英文網(wǎng)站、手機(jī)端網(wǎng)站、網(wǎng)站推廣等服務(wù)，滿足客戶于互聯(lián)網(wǎng)時(shí)代的建始網(wǎng)站設(shè)計(jì)、移動(dòng)媒體設(shè)計(jì)的需求，幫助企業(yè)找到有效的互聯(lián)網(wǎng)解決方案。努力成為您成熟可靠的網(wǎng)絡(luò)建設(shè)合作伙伴！

for：for(初始化；循環(huán)條件；操作1){操作2；}

當(dāng)不滿足循環(huán)條件時(shí)，退出循環(huán)，例如：

for($i=0;$i<4;$i++){print “$i “;}

# 輸出：0 1 2 3

foreach：歷遍數(shù)組，例如：

foreach $i(0..3){print “$i “;}

# 輸出：0 1 2 3

for也有同樣的功能：

for $i(0..3){print “$i “;}

# 輸出：0 1 2 3

while：while(條件){操作；}

 #直到條件不成立才退出循環(huán)

until：until(條件){操作；}

#直到條件成立才退出循環(huán)

my $i = 4;

while($i){print “$i “;$i--;};         #輸出：4 3 2 1

print “\$i = $i\n”;               #輸出：$i = 0

until($i>4){print “$i “;$i++;}     #輸出：0 1 2 3 4

print “\$i = $i\n”;              #輸出：$i = 5

while常用于歷遍文件輸入的內(nèi)容：

open IN,”inflie” or die$!;

while(my $line=){

         print$line;

}

close IN;

next：進(jìn)入下一輪循環(huán)

for $i(1..4){

         if($i% 2){next;}

         print“$i “;

}                                    #輸出：2 4

last：退出循環(huán)

for $i(1..4){

         if($i>2){last;}

         print“$i “;

}                                    #輸出：1 2

以上是“Perl控制結(jié)構(gòu)有哪些”這篇文章的所有內(nèi)容，感謝各位的閱讀！希望分享的內(nèi)容對(duì)大家有幫助，更多相關(guān)知識(shí)，歡迎關(guān)注創(chuàng)新互聯(lián)行業(yè)資訊頻道！