Did you know?

93% of Paint Splatters are Valid Perl Programs!

map{substr$_->[0],$_->[1]||0,1}[\*||{},3],[[]],[ref qr-1,-,-1],[{}],[sub{}^*ARGV,3]

Replies are listed 'Best First'.
Re: April 1 Article on Perl
by Eily (Monsignor) on Apr 05, 2019 at 09:23 UTC

    I suppose that the reverse is also true. That most perl programs also happen to be valid paint splatters. I'm sure some poor hacker somewhere wrote a one liner that solves travelling salesman in linear time, and displayed it proudly on the wall, only for the program to be stolen and displayed in some billionnaire's private collection of Polock paintings.

      "...the reverse is also true...solves travelling salesman in linear time..."

      Heilige Scheiße...

      «The Crux of the Biscuit is the Apostrophe»

      perl -MCrypt::CBC -E 'say Crypt::CBC->new(-key=>'kgb',-cipher=>"Blowfish")->decrypt_hex($ENV{KARL});'Help

Re: April 1 Article on Perl
by tobyink (Canon) on Apr 05, 2019 at 08:41 UTC

    I love this Quine they include in the article…

    Illegal division by zero at /tmp/quine.pl line 1.

    Save that error message as "/tmp/quine.pl" (on a Unix-like system) and then run perl /tmp/quine.pl.