Beefy Boxes and Bandwidth Generously Provided by pair Networks
Welcome to the Monastery
 
PerlMonks  

Comment on

( #3333=superdoc: print w/ replies, xml ) Need Help??
dave_the_m,
I couldn't find it documented anywhere. So it is how the function is called that is causing the problem. I can still produce a fair amount of misdirection. I am not sure I have the time or energy to actually make the obfu, but I would be happy and impressed if someone did. Like most magic and misdirection, the most important part is the setup.

You will need to hide the tie, sub TIESCALAR, and friends. This should be possible using evil eval. The FETCH needs to be special too. Instead of using an internal goto to produce the magic, it will return the current value in the STORE the first time, but the second time it will return a different label.

my $label; # magic setup happens here $label = 'START'; print "$label\n"; # prints START goto $label; exit; START: print "Hello, world\n"; END: print "Goodbye, cruel world\n";
When it is run, the output will be unexpected:
START Goodbye, cruel world
In any case, if you happen to find some documentation explaining this behavior I would appreciate it.

Cheers - L~R


In reply to Re^2: Mixing tied variables with goto label by Limbic~Region
in thread Mixing tied variables with goto label by Limbic~Region

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!
  • 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, 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, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • Outside of code tags, you may need to use entities for some characters:
            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.
  • Log In?
    Username:
    Password:

    What's my password?
    Create A New User
    Chatterbox?
    and the web crawler heard nothing...

    How do I use this? | Other CB clients
    Other Users?
    Others having an uproarious good time at the Monastery: (9)
    As of 2014-10-21 19:20 GMT
    Sections?
    Information?
    Find Nodes?
    Leftovers?
      Voting Booth?

      For retirement, I am banking on:










      Results (106 votes), past polls