And this is cheat again. 'goto' executed 4 times in 1st test, and 7 times in last test. You can achieve same if replace 'goto' with return, there won't be 'goto' in this code at all then (i.e. you rewrited this one particular case with plain recursion, without jumping frames)

And by the way, just in case if you pretend that it's always best to work that way, here is your posting where you explain to another monk, that it's not http://www.perlmonks.org/?node_id=1034169

For instance, when designing a recursion to search a graph it's sometimes desirable to stop immediately after the goal is reached.
Also, this your cite explains everything
goto always jumps to the last TARGET -label in the call-stack and
So,

1 LABEL in source code can "remember" 1 stackframe.

and

1 with_return statement in source code can "remember" N stackframes.

In reply to Re^13: Continuations in Perl - Returning to an arbitrary level up the call stack by vsespb
in thread Continuations in Perl - Returning to an arbitrary level up the call stack by unlinker

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.