Ton wrote: > Please mail me your best solutions and any particularly interesting ones.
#!perl -pl
++$_[--$_]while$_}for(sort@_){
Ton wrote: > Please mail me your best solutions and any particularly interesting ones.
#!perl -pl
++$_[--$_]while$_}for(sort@_){