Copyright © tutorialspoint.com

PERL redo Function


Syntax

redo LABEL

redo


Definition and Usage

Restarts the current loop without forcing the control statement to be evaluated. No further statements in the block are executed. A continue block, if present, will not be executed.

If LABEL is specified, execution restarts at the start of the loop identified by LABEL.

Return Value

  • Nothing

Example

Try out following example:

#!/usr/bin/perl -w

$c = 1;
$d = 4;
LABEL:
{
   $c++;
   $e = 5;
   redo LABEL if ($c < 3);
   $f = 6;
   last LABEL if ($e > 3);
   $g = 7;
}
$h = 8;
print ("$c $d $e $f $g $h\n");

It will produce following results:

3 4 5 6  8

Copyright © tutorialspoint.com