''=~('(?{'.('_]@@+`'^'//)._@').'"'.('{_],`(_#@(^'^'+:/@@{*@+[|').',$/})') (Thats not line-noise, thats perl! Go ahead, run it.) Inspired by: http://y99k.com/obfuscate.html