|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Alex Dedul 2:450/82 04 Oct 2002 16:02:42
To : All
Subject : the perl review
--------------------------------------------------------------------------------
Читаю сабж, колонка perl golf-а это что-то. В 3-ем номере было такое, что
сильно способствует пониманию всяких заковыристых путей написания кода, умеют
же запутать. Занимательно, вместо чтения анекдотов на работе ж). У мню ушло
чуть меньше часа пока понял как работает этот 61 символ.
Golfers had to sort into classes all anagram in the input, and to sort the
classes by number of words, alphabetized by first word. For example,for the
word list "the perl review lives tables viewer elvis stable ablest" the
programs should produce
Lars Mathiesen, March's beginner catagory winner, won the veteran category with
61 strokes:
map!s/
^/ /m|//||print,sort%0for map$0{0,sort/./g}.=$_,sort<>
WBR, Alex
winamp$ Biosphere & H.I.A 'Birmingham Frequencies'1999 - Augusta Road <stopped>
--- GoldED+/W32 1.1.4.7
* Origin: Iron Hills Lab. (2:450/82)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
