Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -W -T ################################
    
    ...
    #####  #    # #    # #    #   #    ####  #    #  ####
    
    s/\s+|\n+//g;eval scalar reverse; print "\n"; ########
    
  2. or download this
    perl -Te 'print map { chr((ord)-((10,20,2,7)[$i++])) } split //,"turo"
    +."\n"'