Exit a Loop with Last

To exit a loop when a condition is met type:

last;


Example:

@dr=("London", "Paris", "Tokyo");

foreach $dr(@dr) {

if ($dr eq "Paris") {
print "Our city: $dr<br>";
last;
}
else {
print "Not our city: $dr<br>";
}
}


Which prints:
Not our city: London
Our city: Paris


-The array @dr contains our cities.
-We loop over the array with foreach.
-We say "If $dr equal Paris, print and exit the loop."

The first time through the loop "else" is executed and London gets printed. The second time through the loop, the "if" condition is met, so we print and exit. The third time through the loop never happens.



Copy and Paste Perl Code:

#!/usr/bin/perl

print "Content-type:text/html\n\n";


@dr=("London", "Paris", "Tokyo");

foreach $dr(@dr) {

if ($dr eq "Paris") {

print "Our city: $dr<br>";
last;

}
else {
print "Not our city: $dr<br>";
}
}

exit;



Click HERE to comment or discuss at iLoveTheCode GOOGLE Group

Previous Article: Opening and Reading a Directory in Perl

Next Article: Putting Two Strings Together, Concatenate

CSS Eric Meyer New $29.69	Dreamweaver CS3 David McFarland New $29.69	Bulletproof Web Design Dan Cederholm New $23.99
jQuery in Action Bear Bibeault, Yeh... New $26.39	HTML & XHTML Chuck Musciano, Bi... New $29.99	Head First HTML with CSS & XHTML Eric Freeman, Elis... New $23.99
JavaScript David Flanagan New $31.49	New Perspectives on HTML and XHTML 5... Partrick Carey New $67.45	CSS Mastery Andy Budd, Simon C... New $23.85

Privacy Information