[Moscow.pm] Китайская грамота и перлгольф

[Ivan Petrov]

> Пишу в фейсбуке однострочник (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 гольф
> — (".") Мне вот этот нравится

> Интересная реация для непосвященных;))

никогда не понимал стремящихся на перле написать какую-то хрень,
которую не прочитать