Easy Tutorial
Perl Packages Modules Perl Arrays Perl References Perl Variables Perl Date Time Perl Regular Expressions Perl Conditions Perl Process Management Perl Do While Loop Perl Foreach Loop Perl Last Statement Perl While Loop Perl Redo Statement Perl Directories Perl Socket Programming Perl Hashes Perl Cgi Programming Perl Formats Perl Subroutines Perl Intro Perl Loops Perl Goto Statement Perl If Elsif Statement Perl Next Statement Perl Unless Elsif Statement Perl Nested Loops Perl Switch Statement Perl Database Access Perl Object Oriented Perl Unless Else Statement Perl Scalars Perl If Else Statement Perl Until Loop Perl Environment Perl Data Types Perl Sending Email Perl Special Variables Perl If Statement Perl For Loop Perl Error Handling Perl Files Perl Continue Statement Perl Embedded Documentation Perl Unless Statement Perl Tutorial Perl Operators Perl Syntax
❮ Perl Foreach Loop Perl While Loop ❯

Perl last Statement

Perl Loops

The Perl last statement is used to exit a loop block, thereby terminating the loop. Statements following the last statement are not executed, nor are the statements within the continue block.

Syntax

The syntax is as follows:

last [LABEL];

Flowchart

Example

#!/usr/bin/perl

$a = 10;
while( $a < 20 ){
   if( $a == 15)
   {
       # Exit the loop
       $a = $a + 1;
       last;
   }
   print "The value of a is: $a\n";
   $a = $a + 1;
}

Executing the above program will output:

The value of a is: 10
The value of a is: 11
The value of a is: 12
The value of a is: 13
The value of a is: 14

Perl Loops

❮ Perl Foreach Loop Perl While Loop ❯