programming-examples/perl/Statement/The last statement breaks out of a loop from within the loop block.pl

$n=0;
while( $n < 10 ){
   print $n;
   if ($n == 3){
       last;  # Break out of loop
   }
   $n++;
}
print "Out of the loop.<br>";