foreach ( 1 .. 10 ) { if ( $_ == 5 ) { $number = $_; # store current value before loop ends last; # jump to end of foreach structure } print "$_ ";}print "\n\nUsed 'last' to terminate loop at $number.\n";