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

JAPH with a smiley

by choroba (Chancellor)
on Sep 03, 2013 at 22:20 UTC ( #1052185=obfuscated: print w/ replies, xml ) Need Help??

I think the idea is not bad, but the JAPH phrase is a bit long for that, so it gets boring quickly.
sub e{sub _{-72} er}eval($/='sub J{map{substr$/,ref('.q:)?pop@$_\:$_,$ +$_[0]||1} @_}sub f{uc join "system",J(@_)}print J 4=>1,[2,13],-1,010-1,[ _ ],42- +020,hex"e ";print+h,e,$",f(__LINE__*2+2),e,qw,l,,J(-1,-hex 20),q{ack},e,J hex or +d(0)/4 :)
A variant that is a bit profane:
sub k{join shift,@_}sub e{sub _{-60}er}eval($/='sub J{map{substr$/,ref +()?pop'.q :@$_\:$_,$$_[0]||1}@_}sub f{uc k"system",J(@_)}print J 4,1,[2,13],-1,0 +10-1,[_], 42 -020,hex e;print+h,e,$",f(__LINE__+6),e,qw,l,,J(-1,-hex 16),q{ack}, +e,J 18 :)
لսႽ† ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ

Comment on JAPH with a smiley
Select or Download Code
Replies are listed 'Best First'.
Re: JAPH with a smiley
by choroba (Chancellor) on Sep 04, 2013 at 11:37 UTC

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: obfuscated [id://1052185]
Approved by Athanasius
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others exploiting the Monastery: (5)
As of 2016-05-04 00:07 GMT
Find Nodes?
    Voting Booth?