Help for this page

Select Code to Download


  1. or download this
    # score = 53
#            1         2         3         4         5         
#   12345678901234567890123456789012345678901234567890123456789
perl -E'say" "x($t-$_),(1x$_)**2for(1x($t=pop))**2=~/./g'          9
  2. or download this
    # score = 52
#            1         2         3         4         5         
#   12345678901234567890123456789012345678901234567890123456789
perl -E'say$"x($t-$_),(1x$_)**2for(1x($t=pop))**2=~/./g'          9