Black Perl
Salt la navigare Salt la căutare
Black Perl este un celebru poem scris în limbajul de programare Perl și postat pe Usenet la 1 aprilie 1990. Este scris în versiunea Perl 3 și nu poate fi interpretat corect în Perl 5, decât prin intermediul unor actualizări independente. [1] [2]
Atribuire
Deși compoziția este semnată „ Larry Wall ”, mesajul original a fost postat cu un antet falsificat, provocând incertitudine. S-a presupus mai întâi că autorul era Sharon Hopkins , dar ea a negat; [3] Randal Schwartz a susținut că de fapt autorul era Wall, [4] care a confirmat în cele din urmă. [5]
Text
ÎNAINTE: închideți ușa , fiecare fereastră și ieșiți ; așteptați până la timp .
deschideți cartea de vrăji , studiați , citiți ( scanați , selectați , spuneți- ne );
scrie - l, în timp ce imprimați hex fiecare ceasuri,
inversa lungimea sa, scrie din nou;
ucide păianjeni, pop - le, taie, divizat, ucide - le.
deconectați brațele , schimbați , așteptați și ascultați ( ascultați , așteptați ),
sortează turma (apoi, avertizează „caprele“ și ucide „oi“);
ucideți- i , aruncați calme , schimbați moralitățile ,
valori deoparte, fiecare dintre ele ;
muri oi ! mor pentru a inversa sistemul
acceptați (respingere, respect);
pasul urmator ,
ucide următorul sacrificiu, fiecare sacrificiu,
așteptați , refaceți ritualul până când „toate spiritele sunt mulțumite” ;
fă- o ( „așa cum se spune” ) .
fă - o (* toată lumea *** *** trebuie să participe *** in *** interzise s ** * si * x *).
întoarce ultima victimă ; corpul pachetului ;
ieșiți din criptă ( ora , orele și „o jumătate de timp” ) și închideți- o ,
selectează ( rapid ) și avertizează- ți următoarea victimă ;
POST-CUVINTE: nu spune nimănui .
așteptați , așteptați până la timp ;
așteptați până anul viitor , următorul deceniu ;
dormi , dormi , mori singur ,
mor în sfârșit
# Larry Wall
Notă
- ^ jonadab, Black Perl actualizat pentru Perl 5 , la perlmonks.org , 21 februarie 2003. Accesat la 19 octombrie 2012 .
- ^ Ovidiu, Black Perl Revisited , pe perlmonks.org , 17 octombrie 2006. Adus 19 octombrie 2012 .
- ^ (EN) Sharon Hopkins, Re: Forking a grunch of process ... , comp.lang.perl la 16 aprilie 1993. Adus la 19 octombrie 2012 ( depus la 19 octombrie 2012).
- ^ (EN) Randal L. Schwartz, Re: Black Perl , comp.lang.perl.misc pe 4 septembrie 2001. Adus pe 19 octombrie 2012 ( depus 19 octombrie 2012).
- ^ Conversație IRC cu Larry Wall (TimToady) , la irclog.perlgeek.de , 11 mai 2010. Accesat la 19 octombrie 2012 .