Beefy Boxes and Bandwidth Generously Provided by pair Networks
There's more than one way to do things
 
PerlMonks  

My Cell Phone Utilizes Dynamic Scoping

by nefigah (Monk)
on Mar 26, 2008 at 01:02 UTC ( #676278=perlmeditation: print w/ replies, xml ) Need Help??

So I've charged my cell phone a ton of times, but just now made the connection: when you plug it in, it always turns the volume to a certain level, and when you unplug it, the volume goes back to whatever it was before (including Vibrate).

Now that I know Perl:

package Phone::Cell; sub charge { local $volume = 4; # Charge... }

This goofy message brought to you by nefigah, the letter 'F', and viewers like you.


I'm a peripheral visionary... I can see into the future, but just way off to the side.

Comment on My Cell Phone Utilizes Dynamic Scoping
Download Code
Re: My Cell Phone Utilizes Dynamic Scoping
by sundialsvc4 (Monsignor) on Mar 27, 2008 at 21:20 UTC

    { $self->goto($self->find_nearby('tall_bridge')); $self->drop_into('the_river', $my_phone); $self->say("Good Riddance!\n"); $my_phone = new Apple::iPhone(); }
    :-D

      I'm getting a ton of warnings when I try to run this and my phone just auto-dialed 911.

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others wandering the Monastery: (4)
As of 2014-07-26 04:29 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My favorite superfluous repetitious redundant duplicative phrase is:









    Results (175 votes), past polls