Manual

- Overview
- Tutorials
- FAQs
- History / Changes
- License

Reference

- Language
- Functions
- Operators
- Special Variables
- Pragmas
- Utilities
- Internals
- Platform Specific

Modules

- A • B • C • D • E
- F • G • H • I • L
- M • N • O • P • S
- T • U • X

News / Blogs

- Perl Buzz
- Perl Iron Man
- Perlsphere
- Planet Perl
- TPF news
- Use Perl

See also

- CPAN
- Perl.org
- Perl.com
- Perl 5 Wiki
- Perl Jobs
- Perl Mongers
- Perl Monks

Contact

- Site designed and maintained by Jon Allen (JJ)
- http://perl.jonallen.info

- View the project page and FAQs

# redo

Perl 5 version 10.1 documentation
Go to top

# redo

Perl functions A-Z | Perl functions by category | The 'perlfunc' manpage

- redo LABEL

- redo

  The `redo` command restarts the loop block without evaluating the conditional again. The `continue` block, if any, is not executed. If the LABEL is omitted, the command refers to the innermost enclosing loop. 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 (<STDIN>) {	while (s|({.*}.*){.*}|$1 |) {}	s|{.*}| |;	if (s|{.*| |) {	    $front = $_;	    while (<STDIN>) {		if (/}/) {	# end of comment?		    s|^|$front\{|;		    redo LINE;		}	    }	}	print;    }

  `redo` cannot be used to retry a block which returns a value such as `eval {}` , `sub {}` or `do {}` , and should not be used to exit a grep() or map() operation.

  Note that a block by itself is semantically identical to a loop that executes once. Thus `redo` inside such a block will effectively turn it into a looping construct.

  See also "continue" for an illustration of how `last`, `next`, and `redo` work.

Recently read

Tools

- Preferences