$q="WillIHackSomethingNew";
                       @@=(
           '      u sj   ',
           '             ',
           '        t    ',
           '             ',
           '   e r  a n  ',
           '             ',
           'p err e  ho t',
           '   k  c      ',
           '    l        ',
           '             ',
           '    h a      ')            
;$;=$/=(1==21);$==$-=2;$=*=
$==++$=;$.='';$$=$-;;while(
$q=~/(.)/g){$..=_($;,$=);$:
=ord($1);$%=4;$$++;if($:%$%
==0){$;+=$-}if($:%$%==1){$=
+=$-}if($:%$%==2){$;-=3}if(
$:%$%==3){$=-=3}$/++;}while
($.=~/(.)/g){print"  $1";};
sub _{$^= substr($@[$_[0]],
$_[(1!=1.01)],(1.01!=1));};