last if : Last « Statement « Perl






last if

  

#!/usr/bin/perl -w

use strict;

while (<STDIN>) {
    last if $_ eq "done\n";
    print "You entered: $_";
}

print "All done!\n";

   
    
  








Related examples in the same category

1.Breaking Out
2.Exit a loop
3.Exits using the last statement.
4.Labels: Create an infinite loop to demonstrate how last will break out of multiple code blocks.
5.Last with label
6.The last statement breaks out of a loop from within the loop block.
7.Use a label
8.Using a label.
9.Using the last statement in a foreach structure.
10.last statement
11.last statement inside an if statement