Ton wrote:
> "Dave Hoover" <[EMAIL PROTECTED]> writes:
> > Ton wrote:
> >> Please mail me your best solutions and any particularly interesting
ones.
> >
> > #!perl -pl
> > ++$_[--$_]while$_}for(sort@_){
>
> Rejected...
Oh, yeah...I knew that was too easy with the sort. Sorry, I was gone all
weekend so I never had a chance to use the test program. The sort had
always worked for me because I never tested with over 9 rows of boxes. I
guess I need to revert to this previous solution:
#!perl -pl
++$_[--$_]while$_}for(reverse@_){
It passes the test program OK for me. Go ahead and drop me down with the
Gang of Six at 37.
--Dave
