Ребята, я уже долго наблюдаю подобные извращения. Вот скажите - в чем прикол (я вообще про этот Perl Golf)?!
Сразу признаюсь - охоту отбивает подумать что _этим_ кодом добиться можно, какой в этом сакральный смысл? Мне кажется,
у многих это отбивает напрочь охоту изучать Perl после такого рода примеров (это имхо).

On 04.06.2009 17:32, spleenjack wrote:
Andrey пишет:
Чё уж там, ещё минус много выкидыванием do: (149.608 strokes):
#!perl -naF
map{/[h-l]/?${$;[$n]=o;p...@p,$n;$;[$p[++$t]]='-'if$;[$n+=$$_]<1;$;[$n]=x}:/x/&&($k-=...@f,$l=!$h--,$n=@;),$p[/o/]=@;,@p>2||push@;,$...@f}{print@

Хехе, интересное извращенное использование ${} %)
--
Moscow.pm mailing list
[email protected] | http://moscow.pm.org

-- 
Sincerely,
Dennis S.Davidoff
System/Network Engineer, Nexo Russia, Moscow
mailto: [email protected]
tel. (495) 981-6211



Attachment: smime.p7s
Description: S/MIME Cryptographic Signature

--
Moscow.pm mailing list
[email protected] | http://moscow.pm.org

Ответить