← Back to context

Comment by nathell

3 days ago

How Perl was created:

‘Larry, throw the cat at the keyboard!’

MEEEOW!

‘What did it type?’

‘&}Ak'>v=4%Qe}9;’

‘OK, so let’s make this a syntax for hello world.’

I also often blame it on my cat, but unfortunately, the truth is simpler ... Larry was inspired by awk. So this is why perl is snoopy swearing.

I was very disappoint to learn that '&}Ak'>v=4%Qe}9;' is not actually hello world in perl :(

here's an actual one: print'(%,,/@(/),$!'^'`@@@@`_@[@@+'

another one

    $/=~s##'&}(/%]?`~=.&~(@^,_!$/"'^'+.{|}!_{.|=.^_/,@;'^'}!:=,^(~<-|$'#ee

I did genuinely try to run this since, well, it could be true, I don't know Perl.

Bareword found where operator expected (Missing operator before "Ak"?) at -e line 1, near "&}Ak" Bad name after Ak' at -e line 1.