last - perldoc.perl.org

Perl Programming Documentation
Download Perl
Explore

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

Tools

- Preferences

# last

Perl 5 version 18.2 documentation
Go to top
Show recent pages
Recently read

# last

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

- last LABEL

- last EXPR
- last

  The `last` command is like the `break` statement in C (as used in loops); it immediately exits the loop in question. If the LABEL is omitted, the command refers to the innermost enclosing loop. The `last EXPR` form, available starting in Perl 5.18.0, allows a label name to be computed at run time, and is otherwise identical to `last LABEL` . The `continue` block, if any, is not executed:

          LINE: while (<STDIN>) {        last LINE if /^$/;  # exit when done with header        #...    }

  `last` cannot be used to exit a block that 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 `last` can be used to effect an early exit out of such a block.

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

  Unlike most named operators, this has the same precedence as assignment. It is also exempt from the looks-like-a-function rule, so `last ("foo")."bar"` will cause "bar" to be part of the argument to `last`.