Your skill will accomplish what the force of many cannot |
|
PerlMonks |
Abusing sort()by phroggy (Monk) |
on Jul 11, 2005 at 19:12 UTC ( [id://474055]=obfuscated: print w/replies, xml ) | Need Help?? |
perl -e'$_=sprintf("%08b"x12,map hex,"5EE62C8938D2813268509E9B"=~/../g);print sort{(1+chop)*2-3}split"","Puht r arJtel\ncerae on,khs";'
Update to take into account both sorting algorithms: perl -e'$_=sprintf("%08b"x12,map hex,($]<5.008?"194E8E91CC3A0097991C0350":"5EE62C8938D2813268509E9B")=~/../g);print sort{(1+chop)*2-3}split"","Puht r arJtel\ncerae on,khs";'
Back to
Obfuscated Code
|
|