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

Perl

by pikus (Hermit)
on Jun 20, 2004 at 07:53 UTC ( [id://368253]=poem: print w/replies, xml ) Need Help??

spiritual code
transcendent in its beauty
graceful, functional
   -pikus
"I want to live 'till I die. No more. No less." - Eddie Izzard

Replies are listed 'Best First'.
Re: Perl
by monsieur_champs (Curate) on Jun 21, 2004 at 15:25 UTC

    I personally loved it. ++. And had an idea that maybe could be considered an obfu-rewrite of your poem. Counting with your permission, I'm posting my interpretation of it:

    #!/usr/bin/perl @_=qw# 83 112 105 114 105 116 117 97 108 32 99 111 100 101 10 84 114 97 110 99 101 110 100 101 110 116 32 105 110 32 105 116 115 32 98 101 97 117 116 121 10 71 114 97 99 101 102 117 108 44 32 102 117 110 99 116 105 111 110 97 108 10 chr nt pri map#;eval join'',join(' ',pop@_,'{',pop(@_). pop@_,pop(@_),'} '),join',',@_;

    Of course, this is much more artistic than an obfuscation. Otherwise, I shall post it in the Obfuscation section.

      That is beautiful. I like it alot! Thanks for doing that. You have absolute permission to post that wherever you want. - Pikus
      "I want to live 'till I die. No more. No less." - Eddie Izzard

Log In?
Username:
Password:

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

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

    No recent polls found