[Moscow.pm] perl japh rage comic

Иван Бессарабов ivan на bessarabov.ru
Вт Авг 12 14:27:06 PDT 2014


Круто! =)

Прежде чем запускать разобрался как это работает. Это такой хорошй
способ сказать s///ee А потом:

#!/usr/bin/perl

my $str = '115.97.121.32.39.74.117.115.116.32.97.110.111.116.104.101.114.32.80.101.114.108.32.72.97.99.107.101.114.39';

my @chars = split /\./, $str;
print chr($_) foreach @chars;
__END__
outputs:
say 'Just another Perl Hacker'

Кажется, что в комиксе который я ищу там было что-то основанное на
этой идее, но еще с одним преобразованем — чтобы сжать цепочку цифр в
более короткую буквенно-цифровую последовательность.


2014-08-13 0:59 GMT+04:00 Alexander Onokhov <ccnweb на gmail.com>:
> цифры буквы пара кавычек и точки
>
> perl -E 's ss
> 115.97.121.32.39.74.117.115.116.32.97.110.111.116.104.101.114.32.80.101.114.108.32.72.97.99.107.101.114.39
> see'
>
>
>
> 2014-08-12 21:45 GMT+03:00 Иван Бессарабов <ivan на bessarabov.ru>:
>>
>> Точно помню что был rage comic на котором человечек долго смотрит на
>> совершенно непонятный perl однострочник, который выводт Just another Perl
>> hacker.
>>
>> Было что-то вроде этого:
>> https://upload.bessarabov.ru/bessarabov/fG8i3Bx12XiNBghOzVIZuKf0AL4.png
>>
>> Может быть у кого-нибудь есть под рукой этот комикс? Или может быть вы
>> помните
>> этот однострочкик (в интернете куча кода, который выводит Just another
>> Perl
>> hacker, но мне не удалось найти именно этот безумно элегантный вариант —
>> помню
>> что там в нем были только цифры-буквы и пара кавычек)
>> --
>> Moscow.pm mailing list
>> moscow-pm на pm.org | http://moscow.pm.org
>
>
>
>
> --
> Alexander
>
> --
> Moscow.pm mailing list
> moscow-pm на pm.org | http://moscow.pm.org
>


Подробная информация о списке рассылки Moscow-pm