Um, that wasn't what I basically said.
The quote you are paraphrasing from goes:
I have not personally ever felt the desire to (other than
in deliberate experimentation) use a goto in Perl for
anything other than subverting the stack. However I remain
aware that I could, and I would do it without
hesitation if I thought the situation warranted it. I also
doubt I will ever encounter such a situation, but I think I
could likely spot it if I did...
Which means that I have used goto
. In production code. For exactly what Ovid
is doing, namely subverting the stack. While I wouldn't use a goto
for that here, it is sometimes the right thing to do. An example is in an import
method. Take a look at, for instance, Versioned modules
. Why do I need to do it there? Quite simply because I need to remove myself from the call-stack so that an import method which knows nothing of me will export anything it exports to the correct package.