Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation
 
PerlMonks  

Re: Mixing tied variables with goto label

by jeffa (Chancellor)
on Nov 15, 2005 at 21:32 UTC ( #508802=note: print w/ replies, xml ) Need Help??


in reply to Mixing tied variables with goto label

Try this:

sub FETCH { 'END' }
This is kinda neat. :)

jeffa

L-LL-L--L-LL-L--L-LL-L--
-R--R-RR-R--R-RR-R--R-RR
B--B--B--B--B--B--B--B--
H---H---H---H---H---H---
(the triplet paradiddle with high-hat)


Comment on Re: Mixing tied variables with goto label
Download Code
Re^2: Mixing tied variables with goto label
by Limbic~Region (Chancellor) on Nov 16, 2005 at 00:07 UTC
    jeffa,
    Try this:

    Yeah, but there is nothing special about that behavior. goto $var treats $var as the label as I showed in my first example. What I am trying to do is a little misdirection. Imagine that I could make you forget that I had a tied variable and that storing a value didn't appear to do anything abnormal:

    my $label = 'START'; goto $label; START: print "Hello, world\n"; END: print "Goodbye, cruel world\n";

    When you run the code, instead of going to START it actually goes to END. The trouble is that the label goes away inside the tied FETCH sub with no explanation I can find.

    Cheers - L~R

    Added a code example to make it clearer what is being attempted.

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others browsing the Monastery: (9)
As of 2014-07-25 07:12 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My favorite superfluous repetitious redundant duplicative phrase is:









    Results (169 votes), past polls