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

Re: Emotijaph :(

by teamster_jr (Curate)
on Aug 15, 2006 at 14:04 UTC ( #567471=note: print w/ replies, xml ) Need Help??


in reply to Emotijaph :)

much too happy
try this:

#!/usr/bin/perl {;$ _ =q(Ju st a nothe r sad P erl h acker ,); s [ \s {2,}] {}xsg ;};$# =$_ ; {;s(: )(: : ];);} print $=;;
a update: Actually for some reason i was just reminded about a story about two pubs across the road from each other near southampton, "the happy cheese" and "the sad cheese". The sad cheese was always empty and had to shut down.


Comment on Re: Emotijaph :(
Download Code

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others perusing the Monastery: (11)
As of 2014-12-18 10:39 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    Is guessing a good strategy for surviving in the IT business?





    Results (49 votes), past polls