Just for fun :P 
print$/=~s~~r~r=~s~~e~r=~s~~k~r=~s~~c~r=~s~~a~r=~s~~h~r=~s~~ ~r=~s<>
~l~r=~s~~r~r=~s~~e~r=~s~~P~r=~s~~ ~r=~s~~r~r=~s~~e~r=~s~~h~r=~s~~t~r
=~s~~o~r=~s~~n~r=~s~~a~r=~s~~ ~r=~s~~t~r=~s~~s~r=~s~~u~r=~s~~J~r////

[download]

Bonus: \&~=~'\(';print+s{\x42}{$"}r,for($`..-$`)[4889245,650731,2540044,8375064,1505137],$/;

Replies are listed 'Best First'.
Re: /r JAPH
by pvaldes (Chaplain) on Dec 29, 2012 at 23:44 UTC 
    print

$INPUT_RECORD_SEPARATOR <- newline

=~s//R/r
=~s//E/r
=~s//K/r
=~s//C/r
=~s//A/r
=~s//H/r
=~s// /
=~s<>/L/r   ; mmh ?
=~s//R/r
=~s//E/r
=~s//P/r
=~s// /r
=~s//R/r
=~s//E/r
=~s//H/r
=~s//T/r
=~s//O/r
=~s//N/r
=~s//A/r
=~s// /r
=~s//T/r
=~s//S/r
=~s//U/r
=~s//J/r
////

    [download]
[reply]
[d/l]

Back to Obfuscated Code