Perl redo用法及代碼示例

Perl 中的重做運算符從給定標簽重新啟動，而不評估條件語句。一旦調用重做，則該塊中將不再執行任何語句。即使是 continue 塊(如果存在)，在重做調用之後也不會執行。如果使用重做運算符給出標簽，則執行將從標簽指定的循環開始。

用法： redo Label

返回：
沒有值

示例 1：


#!/usr/bin/perl -w 
  
$a = 1; 
  
# Assigning label to loop 
GFG: { 
   $a = $a + 5; 
   redo GFG if ($a < 10); 
} 
  
# Printing the value 
print ($a);

輸出：

示例 2(重做循環)：


#!/usr/bin/perl -w 
  
$a = 1; 
  
# Assigning label to loop 
$count = 1; 
GFG: while($count < 10) { 
   $a = $a + 5; 
   $count++; 
   redo GFG if ($a < 100); 
} 
  
# Printing the value 
print ("$a $count");

輸出：

101 21

相關用法

注：本文由純淨天空篩選整理自Code_Mech大神的英文原創作品 Perl | redo operator。非經特殊聲明，原始代碼版權歸原作者所有，本譯文未經允許或授權，請勿轉載或複製。