Mega Code Archive

 
Categories / Perl / Statement
 

The continue block allows the while loop to act like a for loop

$i=1; while ($i <= 10) {      if ($i == 5) {          print "\$i == $i\n";          next;      }      print "$i "; }continue {$i++;}    # $i is incremented only once