Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer
 
PerlMonks  

For What It's Worth, Buffalo Springfield style

by newrisedesigns (Curate)
on Jul 25, 2002 at 01:24 UTC ( [id://185085]=poem: print w/replies, xml ) Need Help??

I read sauoq's post, and thought it was some obfu of the classic song. Here's my half obfu (really thinly veiled obfu)/half poem.

Hope you enjoy.

#!/usr/bin/perl                        #There's somethin' happening here,
my $what = "whfg nabgure crey unpxre,";#What it is ain't exactly clear.
use warnings;                          #There's a man with a gun over there,
use strict; $what =~ tr/n-za-m/a-mn-z/;#Tellin' me I gotta beware.
sleep(5);                              #I think it's time we stop,
print chr(7) . chr(7) . chr(7);        #Hey, what's that sound,
print $what;                           #Everybody look what's going down.

forgive it, it's a little rough... and needs user interpretation :)

John J Reiser
newrisedesigns.com

  • Comment on For What It's Worth, Buffalo Springfield style

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: poem [id://185085]
Approved by ybiC
Front-paged by jarich
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others browsing the Monastery: (3)
As of 2024-04-19 19:22 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found