> Пишу в фейсбуке однострочник (https://www.facebook.com/nmishin) > perl -E 'use IO::All;$p{$_->name}=$_->getlines for > grep{/perlre/}io->dir(".")->all;for$k(sort{$p{$a}<=>$p{$b}}keys%p){say qq{$k > $p{$k}}}' > сестра, спрашивает: > — Китайская грамота? > — это называется perl гольф > — (".") Мне вот этот нравится
> Интересная реация для непосвященных;)) никогда не понимал стремящихся на перле написать какую-то хрень, которую не прочитать -- Moscow.pm mailing list [email protected] | http://moscow.pm.org
