Black Perl Explained

"Black Perl" is a code poem written using the Perl programming language. It was posted anonymously to Usenet on April 1, 1990, and is popular among Perl programmers as a piece of Perl poetry. Written in Perl 3, the poem is able to be executed as a program.

"Black Perl" has been discussed in several scholarly works,^{[1] [2] [3]} and is considered an example of generative literature, a genre of electronic literature.

Attribution

When posted to the comp.lang.perl newsgroup the poem was attributed to "a person who wishes to remain anonymous".^[4] Sharon Rauenzahn (née Hopkins), another Perl poet, has been suspected to be the author but has since denied the claim.^[5]

Result of program execution

When executed, "Black Perl" exits on line one, upon reaching the function exit. The remaining lines are parsed by the Perl interpreter but never actually executed. The program produces no output.

Though it will not parse under Perl 5, multiple independent updates to "Black Perl" to make it parsable in Perl 5 have been published.^{[6] [7]}

"Black Perl"

BEFOREHAND: close door, each window & exit; wait until time. open spellbook, study, read (scan, select, tell us);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 to reverse the system you accept (reject, respect);next step, kill the 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 your next victim;AFTERWORDS: tell nobody. wait, wait until time; wait until next year, next decade; sleep, sleep, die yourself, die at last

See also

• Digital poetry
• PerlMonks

Notes and References

1. . Segura . Cynthia Anne . 2004 . Perls of wisdom: Computer language and Perl poetry .
2. Book: Kerr, Chris . Poetry and contemporary visual culture: = Lyrik und zeitgenössische Visuelle Kultur . Holden . Daniel . 2023 . De Gruyter . 978-3-11-129933-4 . Korecka . Magdalena Elisabeth . Poetry in the digital age . Berlin . 172 . Optimizing Code for Performance: Reading ./code --poetry . Vorrath . Wiebke.
3. Tomasula . Steve . Our Tools Make Us (And Our Literature) Post: Essai édité par Jean-Yves Pellegrin (Université Paris-Sorbonne) . Transatlantica . 30 December 2014 . 2 . 10.4000/transatlantica.7102 . free .
4. Book: Larry . Wall . Tom . Christiansen . Jon . Orwant . July 2000 . Programming Perl, Third Edition . O'Reilly . 649 . 0-596-00027-8 .
5. Re: Forking a bunch of processes... . Sharon Hopkins . 1993-04-16 . comp.lang.perl . [e-mail] . December 5, 2014.
6. Web site: Black Perl updated for Perl 5 . jonadab . 2003-02-21 . 2007-09-15.
7. Web site: Black Perl Revisited . Ovid . 2006-10-17 . 2007-09-15.