Beefy Boxes and Bandwidth Generously Provided by pair Networks
Your skill will accomplish
what the force of many cannot
 
PerlMonks  

Comment on

( #3333=superdoc: print w/ replies, xml ) Need Help??

Note: I haven't seen anyone else try this, so if this is duplicated effort, my apologies to the original author.

Many of you are familiar with the famous Black Perl poem. This poem, written for Perl 3, appeared on April Fools day, 1990 on Usenet and was purportedly from Larry Wall, though as I recall, the headers were forged. However, it no longer compiles under Perl 5. So I tweaked it. It still doesn't do anything, but it compiles.

BEFOREHAND: close door, each window & exit; wait until time. open spellbook, study, select it, confess, tell, deny; write it, print the hex while each watches, reverse "its length", write again; kill spiders, pop them, chop, split, kill them. unlink arms, shift, wait & listen (listening, wait), sort the flock (then, warn "the goats". kill "the sheep"); kill them, dump qualms, shift moralities, values aside, each one; die sheep, die, reverse system you accept (reject, respect); next step, kill next sacrifice, each sacrifice, wait, redo ritual until "all the spirits are pleased"; do it ("as they say"). do it(*everyone***must***participate***in***forbidden**s*e*x*). return last victim; package body; exit crypt (time, times & "half a time") & close it, select (quickly) & warn next victim; AFTERWORDS: tell nobody. wait, wait until time; wait until next year, next decade; sleep, sleep, die yourself and rest at last

Update: and from a friend of mine, for whom I wound up rewriting this because of a couple of misconceptions of his (email reprinted with permission):


I was at a dive bar tonight. They had a poetry reading, open mic. and allowed non-original poetry.

I got on the net and looked up Black Perl.

I read the version at http://internet.ls-la.net/comppoems/black-perl.html. (with full attribution of course)

BROUGHT DOWN THE HOUSE!

Before the read I asked, "Show of hands, how many here are computer programmers?". No hands went up. Then, "How many people here have heard of the programming language 'perl'?". A couple of cheers from the crowd.

I then told the crowd, "perl stands for 'Practical Extraction and Report Language', or, as those who actually program in the language call it, 'Pathologically Eclectic Rubbish Lister'"

After explaining that the following poem was written by the creator of perl, I explained, "This poem is NOT written in English. It is written in the programming language 'perl' ", and read.

It won two awards, Best Nonoriginal Poem, and Best Poem of the night. I won Best Presentation. Kudo's to Larry, he made me look good. ;-)

After the reading I was approached by a person who said that the peom couldn't possibly compile. I invited him to download perl from ActiveState and download a copy of the poem written for the version of perl that he downloaded and test it for himself. He told me, 'That was a great poem and poems do not compile'. Then came the Zen moment, I said. 'That poem is not a poem'. From one atheist to another, I swear to GOD that is what I said!

He is probably still blinking. ;-)


Update 2: a friend just pointed me to Black Perl updated for Perl 5.

--

Cheers,
Ovid

New address of my CGI Course.


In reply to Black Perl Revisited by Ovid

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post; it's "PerlMonks-approved HTML":



  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • Outside of code tags, you may need to use entities for some characters:
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.
  • Log In?
    Username:
    Password:

    What's my password?
    Create A New User
    Chatterbox?
    and the web crawler heard nothing...

    How do I use this? | Other CB clients
    Other Users?
    Others musing on the Monastery: (11)
    As of 2014-09-22 15:12 GMT
    Sections?
    Information?
    Find Nodes?
    Leftovers?
      Voting Booth?

      How do you remember the number of days in each month?











      Results (198 votes), past polls