If software could debug itself there would be no bugs.

Ashley in catalyst.lists.scsys.co.uk mailing list

Выбери простоту изучения.
Выбери вывод ошибок в браузер.
Выбери irc-чаты с 13-летними девочками, после фразы "упало в корку" превращающимися в 40-летних бородатых вонючих мужиков.
Выбери терабайты бесплатного кода, написанного криворукими самоучками.
Выбери несовместимость версий.
Выбери проблемы с xslt.
Выбери нищенскую зарплату.
Выбери конкурентов готовых работать за еду.
Выбери PHP

Однако!
Оказывается, есть список рекомедованных модулей для Perl

Обнаружил на Википедии скрипт-однострочник для печати простых чисел:

perl -wle '(1 x $_) !~ /^(11+)\1+$/ && print while ++ $_'

Абалдеть :)

Очень красивое решение перловой задачи

Мне нужно создать reference на некий хэш, в котором много keys, но мало values. Как бы это по-компактнее записать? Не хочется писать что-то вроде

my $myHash = { key1 => 1,
key2 => 1,
key3 => 1,
...
key154 => 0,
key155 => 0
};


Решение

my $hash = {
map {$_ => 1} qw/one two three/,
map {$_ => 0} qw/four five six/,
};


Достойно восхищения
Респект