Привет. Разгребал тут мамонтовский сервер и нашёл исходник с таким артом.
Думаешь, это всего лишь картинка из архивов старого фидошника? Нифига, это Acme EyeDrops. Visual Programming in Perl.
В арте зашит вполне рабочий Perl-код. Если сохранить эту картинку в файл и затем выполнить его через интерпретатор, ты получишь секретное сообщение.
perl ./pokazisiski.pl
Сам код этого арта сгенерирован с помощью модуля Acme::EyeDrops. Кстати, на странице модуля много примеров с такими картинками (верблюды, морды, заборы, снежинки), каждая выполняет какое-то своё действие, плюс есть примеры генераторов.
А вот эта команда превратит файл обратно в исходник. То есть выведет исходный код вместо того, чтобы его выполнить.
perl -MO=Deparse ./pokazisiski.pl
Говорят, что Perl давно мёртв, но в современных скриптах и решениях люди любят его применять. ХЗ почему, наверное, потому что Perl есть везде. Хотя сейчас глянул: последний релиз был 2024-01-20, версия 5.39.7 (devel), капец, оно живое.
Первое и последнее, что я делал на Perl, — это был вывод «Hello World», на этом моё знакомство с ним закончилось. Даже на Си порог вхождения мне легче показался, хотя по Си у меня была книга, а по Perl — только какие-то огрызки из Фидонета.
Ладно. Побежали дальше мир спасать от криворучек. Увидимся!
Комментарии