$ perl -le' print "1: $_"; s/(?:SEEKING)?/PERLqny~%|fsyx%~tz&/ ? $^X =~ /\w+$/ : DEVELOPERS; print "2: $_"; print "3: $&"; s/$&/Ktsf/i; print "4: $_"; s/./ chr ord( $& ) - 5 /eg; print "5: $_"; $\ = $/; print || " ;) " ' 1: 2: PERLqny~%|fsyx%~tz& 3: perl 4: Ktsfqny~%|fsyx%~tz& 5: Fonality wants you! Fonality wants you!
In reply to Re: Obfusicated code
by Anonymous Monk
in thread Obfusicated code
by boojeboy
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |