Help for this page

Select Code to Download


  1. or download this
    #1 (at 35 chars)
    map{print@_.$";pop@_}@_=($")x ord$/
    ...
    #2
    $$_=~/((((((((((.))))))))))/for$|..ord$/;print map
    $_.$",sort{chr$b cmp chr$a}grep/\d/&$||$_,keys%::