Beefy Boxes and Bandwidth Generously Provided by pair Networks
Keep It Simple, Stupid
 
PerlMonks  

April 1 Article on Perl

by choroba (Cardinal)
on Apr 05, 2019 at 08:21 UTC ( [id://1232181]=perlnews: print w/replies, xml ) Need Help??

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.

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: perlnews [id://1232181]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others surveying the Monastery: (8)
As of 2024-04-23 14:21 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found