Beefy Boxes and Bandwidth Generously Provided by pair Networks
good chemistry is complicated,
and a little bit messy -LW
 
PerlMonks  

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

by BrowserUk (Pope)
on Sep 26, 2003 at 13:59 UTC ( #294421=note: print w/ replies, xml ) Need Help??


in reply to Re: Friday Golf: All 2-digit combinations (wrong!)
in thread Friday Golf: All 2-digit combinations

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.


Comment on Re: Re: Friday Golf: (I think I got it *this* time)
Re^3: Friday Golf: (I think I got it *this* time)
by PhilHibbs (Hermit) on Sep 26, 2003 at 14:11 UTC
    I believe that is the first correct solution! Congratulations, let the ++'s flow!

    See my original post for the checker.

Re3: Friday Golf: (I think I got it *this* time)
by dragonchild (Archbishop) on Sep 26, 2003 at 15:09 UTC
    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.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://294421]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others exploiting the Monastery: (9)
As of 2014-11-26 08:07 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My preferred Perl binaries come from:














    Results (164 votes), past polls