in reply to Re^2: Ponder This: the worm-eaten page
in thread Ponder This: the worm-eaten page

Gasp, what a beautiful orange! Could this really be brilliant Dutch golfer (-ugene in disguise? If so, he might be irritated if someone shaved a single stroke from his lovely solution. ;-)

# One stroke improvement on (-ugene. ^.^ perl -le '$_=join 0,1..9x4;y/0/+/s;print eval' # And a couple of longer ones for fun. perl -le 'print eval join"+",map/[^0]+/g,1..9x4' perl -le 's}}join"+",map/[^0]+/g,1..9x4}ee;print' perl -le 's;;$%x9998;e;s;;++$%;eg;y;0;+;s;print eval'

Replies are listed 'Best First'.
Re^4: Ponder This: the worm-eaten page
by smalhotra (Scribe) on Dec 29, 2004 at 17:35 UTC
    Everyone seems to optimize the algorithm because they understand the deep nature of the problem. After studying the problem for a very long time, here is my highly optimized version: perl -e 'print 37359000, "\n"'

    $will->code for @food or $$;