Statement Perl

  1. Home
  2. Perl
  3. Statement
  4. Using the redo statement in a while structure
$number = 1;
while ( $number <= 5 ) {
   if ( $number <= 10 ) {
      print "$number ";
      ++$number;
      redo;  # Continue loop without testing ( $number <= 5 )
   }
}
    
print "\nStopped when \$number became $number.\n";