=over =item redo LABEL X =item redo EXPR =item redo The L|/redo LABEL> command restarts the loop block without evaluating the conditional again. The L|/continue BLOCK> block, if any, is not executed. If the LABEL is omitted, the command refers to the innermost enclosing loop. The C form, available starting in Perl 5.18.0, allows a label name to be computed at run time, and is otherwise identical to C. Programs that want to lie to themselves about what was just input normally use this command: # a simpleminded Pascal comment stripper # (warning: assumes no { or } in strings) LINE: while () { while (s|({.*}.*){.*}|$1 |) {} s|{.*}| |; if (s|{.*| |) { my $front = $_; while () { if (/}/) { # end of comment? s|^|$front\{|; redo LINE; } } } print; } L|/redo LABEL> cannot be used to retry a block that returns a value such as C, C, or C, and should not be used to exit a L|/grep BLOCK LIST> or L|/map BLOCK LIST> operation. Note that a block by itself is semantically identical to a loop that executes once. Thus L|/redo LABEL> inside such a block will effectively turn it into a looping construct. See also L|/continue BLOCK> for an illustration of how L|/last LABEL>, L|/next LABEL>, and L|/redo LABEL> work. Unlike most named operators, this has the same precedence as assignment. It is also exempt from the looks-like-a-function rule, so C will cause "bar" to be part of the argument to L|/redo LABEL>. =back