Perl: различия между версиями

Строка 1:

~~<noinclude><table cellpadding~~=~~0 cellspacing~~=~~0 style~~=~~"border~~: ~~1px dotted black~~; ~~border-left: none~~; ~~position~~: ~~absolute~~; ~~z-index: 99~~;">~~<td valign~~=~~center width~~=~~1% style~~=~~"background~~-~~color~~: ~~#ff6060~~; ~~color~~: ~~#ffffff~~; ~~font-family~~: ~~Old English Text MT; font-size~~: ~~50px~~; ~~font-weight: bold~~;~~" title~~=~~"Уведомление"~~> ! <~~/td>~~<~~td style="padding: 23px 6px 20px 6px~~; ~~font~~-~~size~~: ~~120%~~;"><b>~~Абсурдопедия переехала~~ и ~~теперь находится по адресу~~ [[~~:pt:ru:Заглавная_страница|absurdopedia.net~~]].~~</b><br />~~См. [[~~:pt:ru:~~{{~~PAGENAME~~}}~~|http://absurdopedia.net/wiki/~~{{~~PAGENAME~~}}]]~~</td></table><hr /></noinclude>~~

'''Пёрл''' ({{lang-en|Perl}}) — специально изобретённый [[язык Черномырдина|Черномырдиным]] [[язык]] для написания стихотворений, переносимых на [[UNIX]]-системы.

'''Перл''' расшифровывается как Попробуй Ето Разобрать, Лузер

== Пример стихотворения ==

'''Предупреждение:''' работает только с Perl версии 3. В версии 4 не работает вовсе, а в версии 5 удаляет все файлы с жёсткого диска [[компьютер]]а и [[пожар|сжигает]] [[процессор]]. В данный момент сообщество программистов с нетерпением ожидает узнать, наконец, что будет творить это произведение искусства в Perl версии 6.

<pre>BEFOREHEAD: close door, each window & exit; wait until time.

open spellbook, study, read (scan, select, tell us);

write it, print the hex whole 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 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</pre>

== Заклинания ==

На Perl можно также писать заклинания для [[девочка-волшебница|девочек-волшебниц]]. В частности, следующая фраза, сопровождённая взмахом [[волшебная палочка|волшебной палочки]], творит ошеломляющие разрушения, сравнимые лишь с действием вышеприведённого стихотворения в Perl v5 (необходимы права [[суперюзверь|суперюзверя]]):

Инструкция по применению.

# Испустите ''боевой крик'';

# Сплюньте три раза через разные плечи, и можете быть уверены в безопасности эксперимента;

# Заранее приготовьте бутылочку [[йад]]а;

# Выполните заклинание;

# Порадуйтесь собственной предусмотрительности (см. пункт 3).

== См. также ==

* [[Йад]]

* [[Пушкин]]

[[Категория:Заговоры против человечества]]

[[Категория:Языки]]

[[en:Perl]]

[[pt:Perl]]

@@ Строка 1: / Строка 1: @@
-<noinclude><table cellpadding=0 cellspacing=0 style="border: 1px dotted black; border-left: none; position: absolute; z-index: 99;"><td valign=center width=1% style="background-color: #ff6060; color: #ffffff; font-family: Old English Text MT; font-size: 50px; font-weight: bold;" title="Уведомление"> ! </td><td style="padding: 23px 6px 20px 6px; font-size: 120%;"><b>Абсурдопедия переехала и теперь находится по адресу [[:pt:ru:Заглавная_страница|absurdopedia.net]].</b><br />См. [[:pt:ru:{{PAGENAME}}|http://absurdopedia.net/wiki/{{PAGENAME}}]]</td></table><hr /></noinclude>
+'''Пёрл''' ({{lang-en|Perl}}) — специально изобретённый [[язык Черномырдина|Черномырдиным]] [[язык]] для написания стихотворений, переносимых на [[UNIX]]-системы.
+'''Перл''' расшифровывается как Попробуй Ето Разобрать, Лузер
+== Пример стихотворения ==
+'''Предупреждение:''' работает только с Perl версии 3. В версии 4 не работает вовсе, а в версии 5 удаляет все файлы с жёсткого диска [[компьютер]]а и [[пожар|сжигает]] [[процессор]]. В данный момент сообщество программистов с нетерпением ожидает узнать, наконец, что будет творить это произведение искусства в Perl версии 6.
+<pre>BEFOREHEAD: close door, each window & exit; wait until time.
+open spellbook, study, read (scan, select, tell us);
+write it, print the hex whole 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 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</pre>
+== Заклинания ==
+На Perl можно также писать заклинания для [[девочка-волшебница|девочек-волшебниц]]. В частности, следующая фраза, сопровождённая взмахом [[волшебная палочка|волшебной палочки]], творит ошеломляющие разрушения, сравнимые лишь с действием вышеприведённого стихотворения в Perl v5 (необходимы права [[суперюзверь|суперюзверя]]):
+ <nowiki>$??s:;s:s;;$?::s;;=]=>%-{<-|}<&|`{;;y; -/:-@[-`{-};`-{/" -;;s;;$_;see</nowiki>
+Инструкция по применению.
+# Испустите ''боевой крик'';
+# Сплюньте три раза через разные плечи, и можете быть уверены в безопасности эксперимента;
+# Заранее приготовьте бутылочку [[йад]]а;
+# Выполните заклинание;
+# Порадуйтесь собственной предусмотрительности (см. пункт 3).
+== См. также ==
+* [[Йад]]
+* [[Пушкин]]
+{{stub}}
+{{unix}}
+[[Категория:Заговоры против человечества]]
+[[Категория:Языки]]
+[[en:Perl]]
+[[pt:Perl]]