Beefy Boxes and Bandwidth Generously Provided by pair Networks
P is for Practical

Re: What would you put on a Perl mug?

by chester (Hermit)
on Oct 27, 2005 at 14:54 UTC ( #503359=note: print w/replies, xml ) Need Help??

in reply to What would you put on a Perl mug?

Quick, someone write a mug-shaped obfu that prints an ASCII picture of a mug.

Replies are listed 'Best First'.
Re^2: What would you put on a Perl mug?
by jbware (Chaplain) on Oct 27, 2005 at 16:42 UTC
    With a lack coffee (ironically enough), this is the best coffee mug graphic I can muster at the moment. So I figured the least I could do was refill it. Unfortunantly the '~' only gets me half-full. And yes, dependent upon my mood, my coffee mug and beer mug look the same :)

    I like the aesthetic zenness of this:
    But this one actually works:
    $_='c[_]'; s/\Qc[_]\E/c[~]/; print $_,$/;

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://503359]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others exploiting the Monastery: (4)
As of 2017-10-19 06:58 GMT
Find Nodes?
    Voting Booth?
    My fridge is mostly full of:

    Results (251 votes). Check out past polls.