The last function, by definition, bails out of the loop that it is currently inside. If there was any confusion as to where the last call would be tossing program flow to, a comment might help. The loop label indicates the start of the loop, not the finish, so you have to read backwards to find the label, then scan fowards to find the loop finish point.

Why not this? 
while (something())
{
     # Lots of stuff, nested functions, etc.
     last if ($condition);   # Move to Post-Processing
     # Lots more stuff
}

# Post-Processing
more_stuff();

[download]
Instead of: 
PROCESS:
while (something())
{
     # Lots of stuff, nested functions, etc.
     last PROCESS if ($condition);
     # Lots more stuff
}

more_stuff();

[download]
If the while() structure was very long, it might be easier to scan for a carefully worded comment.

If you have a reason for putting loop labels in, by all means put them in. All I'm advocating is that there shouldn't be things in a program that are there for no reason.

Or maybe I just don't like Perl programs which feel like: 
_10: print "Hello";
_20: goto _10;

[download]

In reply to Re^3: Grabbing lines three-by-three from a file by tadman
in thread Grabbing lines three-by-three from a file by belden

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.