Попросили сделать разбор одного примера из perl100 (ивент для первокуров компьютерных специальностей в нашем универе). Возможно, памятуя то, что одним из авторов разбора 3х-летней давности был я.
Точнее примеров мне дали несколько, но понравился этот 
(*$,$_)=(sub{q&q&})x2;/./&print &$&$&; — собственно, вот он — пример.
Читать далее