Здравствуйте, _pk_sly, Вы писали:

__>Здравствуйте, Mirrorer, Вы писали:

M>>Эт не зверь. Это старый добрый джей.
M>>Когда начинается пенисометрия в разрезе "кто короче" ему нет равных

__>таки на перле сравнимо получается
__>

__>#!perl -np
__>$_=reduce(\&add,0,split);
__>

__>(reduce и add) описаны отдельно

так не интересно.. в первом j варианте загрузка файла тоже "отдельно заданная функия", хоть и библиотечная.. но можно сделать на чистом j

(+/@".);._2(1!:1<'my.txt')

можно еще на четырех скобках съкономить, но уже не помню как