Re: Re: Friday Golf: (I think I got it *this* time)

[BrowserUk]

62? (Does anyone have a neat one liner for verifying this? trying to check the results is doing my eyes in:)

$_=$n='00';/$n/ or$_.=$n and s/(.)\1\1/$1$1/while$n++<99;print

123456789 123456789 123456789 123456789 123456789 123456789 123

58!

$_=$n='00';/$n/ or$_.=$n,s/(.)(?=\1\1)//while$n++<99;print

123456789 123456789 123456789 123456789 123456789 123456789 123

---

Examine what is said, not who speaks.

"Efficiency is intelligent laziness." -David Dunham
"When I'm working on a problem, I never think about beauty. I think only how to solve the problem. But when I have finished, if the solution is not beautiful, I know it is wrong." -Richard Buckminster Fuller
If I understand your problem, I can solve it! Of course, the same can be said for you.

[dragonchild]

Congratz! Though, I think your algorithm works only because of a peculiarity in 00..99. If you extend it to 000..999, your algorithm doesn't scale, while mine does. :-)

------
We are the carpenters and bricklayers of the Information Age.

The idea is a little like C++ templates, except not quite so brain-meltingly complicated. -- TheDamian, Exegesis 6

Please remember that I'm crufty and crochety. All opinions are purely mine and all code is untested, unless otherwise specified.

[PhilHibbs]

I believe that is the first correct solution! Congratulations, let the ++'s flow!

See my original post for the checker.