#!/usr/bin/perl -W -T ################################

$_=';    )"   gdunw  x    u r@\jp d    l o.frp   "esr   
e    v  e  r  (    r a   l    a   c    s }    ; t    n  
i    r p    ; /    w -azy     x   /    z -    a /    r  
t    { pam';# #####  #  #     #   #    # #####  #    #  
#    # #    # #   #  #   #    #   #    # #   #  #    #  
#####  #    # #    # #    #   #    ####  #    #  ####

s/\s+|\n+//g;eval scalar reverse; print "\n"; ########
[download]

perl -Te 'print map { chr((ord)-((10,20,2,7)[$i++])) } split //,"turo"
+."\n"'
[download]