Hi f77coder,
Many of these are not exactly one-liners, but figuring out some of these JAPH scripts (Update: also, super search, or of course) could be fun :-) This one is my relatively simple contribution:
perl -le "print map+chr 63+oct reverse,reverse+sort+0xbbddcb=~m~..~g"
There are actually lots of variations on the same principle, so naturally I wrote a generator script, these just a few examples of currently more than 2000 ;-)
perl -le "print map+chr 22+oct reverse,reverse+sort+0x21a111a=~m~..~g"
perl -le "print map+chr 23+reverse,sort+0xe8a8ea=~m~..~g"
perl -le "print map+chr -7+reverse,sort+(7*11*0xf7e9b)=~/../g"
perl -le "print map+chr 59+oct reverse,reverse+sort+(5*7*94_61*3**3*2*
+*3)=~/../g"
Regards,
-- Hauke D