reftype obfu -- oneliner


laziness, impatience, and hubris
	PerlMonks

by Discipulus (Abbot)

on Apr 22, 2021 at 20:06 UTC ( #11131623=obfuscated: print w/replies, xml )

Need Help??

perl -MScalar::Util=reftype -e "$}=qr/=.=/,print+(join$\,map{chr(ord($_)-8)}((reftype$})=~/./g))=~s/$}/A/r"

perl -e "$}=qr/=.=/,print+(join$\,map{chr(ord($_)-8)}((uc ref$})=~/./g))=~s/$}/A/r"

There are no rules, there are no thumbs..
Reinvent the wheel, then learn The Wheel; may be one day you reinvent one of THE WHEELS.

Comment on reftype obfu -- oneliner Select or Download Code

Replies are listed 'Best First'.
Re: reftype obfu -- oneliner by choroba (Archbishop) on Apr 22, 2021 at 20:21 UTC
See also Just Another Perl Hacker, where I only used parts of strings returned by ref. `map{substr$_->[0],$_->[1]\|\|0,1}[\\|\|{},3],[[]],[ref qr-1,-,-1],[{}],[sub{}^ARGV,3]`	[reply] [d/l]

Node Status^?

node history
Node Type: obfuscated [id://11131623]
Approved by Corion
help

Chatterbox^?

How do I use this? | Other CB clients

Other Users^?

Others having an uproarious good time at the Monastery: (5)

As of 2021-06-18 15:38 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Voting Booth^?

Notices^?