Beefy Boxes and Bandwidth Generously Provided by pair Networks
We don't bite newbies here... much
 
PerlMonks  

exiting two loop levels

by jeteve (Pilgrim)
on Sep 21, 2006 at 10:17 UTC ( #574090=perlquestion: print w/ replies, xml ) Need Help??
jeteve has asked for the wisdom of the Perl Monks concerning the following question:

Hi wise fellow monks.

I'm wondering how to exit two loops levels with a single instruction.

What I'm searching for whould be some kind of 'last 2' which would exit two levels.

-- Nice photos of naked perl sources here !

Comment on exiting two loop levels
Re: exiting two loop levels
by GrandFather (Cardinal) on Sep 21, 2006 at 10:21 UTC
    OUTER: while (...) { while (...) { ... last OUTER; } }

    /me stands back and waits for the slapped forehead sound.


    DWIM is Perl's answer to Gödel
Re: exiting two loop levels
by davorg (Chancellor) on Sep 21, 2006 at 10:23 UTC

    You need labelled loops.

    OUTER: while ($something_is_true) { INNER: while ($some_other_thing_is_true) { last OUTER if $you_want_to_quit_outer_loop; last INNER if $you_want_to_quit_inner_loop; } }

    See Compound statements in perldoc perlsyn for details.

    Update: Added ':' to labels.

    --
    <http://dave.org.uk>

    "The first rule of Perl club is you do not talk about Perl club."
    -- Chip Salzenberg

Re: exiting two loop levels
by VSarkiss (Monsignor) on Sep 21, 2006 at 14:26 UTC

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://574090]
Approved by GrandFather
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others rifling through the Monastery: (11)
As of 2014-08-28 13:45 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The best computer themed movie is:











    Results (261 votes), past polls