Perl next 語句
Perl next 語句用於停止執行從next語句的下一語句開始到循環體結束識別字之間的語句,轉去執行continue語句塊,然後再返回到循環體的起始處開始執行下一次迴圈。
語法
語法格式如下所示:
next [ LABEL ];
其中 LABEL 是可選的,如果沒有指定 LABEL,next 語句將返回到循環體的起始處開始執行下一次迴圈。
實例
#!/usr/bin/perl
$a = 10;
while( $a < 20 ){
if( $a == 15)
{
# 跳出迭代
$a = $a + 1;
next;
}
print "a 的值為: $a\n";
$a = $a + 1;
}
執行以上程式,輸出結果為:
a 的值為: 10 a 的值為: 11 a 的值為: 12 a 的值為: 13 a 的值為: 14 a 的值為: 16 a 的值為: 17 a 的值為: 18 a 的值為: 19