Beefy Boxes and Bandwidth Generously Provided by pair Networks
Don't ask to ask, just ask
 
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
Replies are listed 'Best First'.
Re: My Cell Phone Utilizes Dynamic Scoping
by sundialsvc4 (Abbot) 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 imbibing at the Monastery: (7)
As of 2015-08-04 04:57 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The oldest computer book still on my shelves (or on my digital media) is ...













    Results (59 votes), past polls