Beefy Boxes and Bandwidth Generously Provided by pair Networks
Think about Loose Coupling
 
PerlMonks  

Re: Re: Friday Golf: All 2-digit combinations (29)

by BrowserUk (Patriarch)
on Sep 26, 2003 at 21:49 UTC ( [id://294555]=note: print w/replies, xml ) Need Help??


in reply to Re: Friday Golf: All 2-digit combinations
in thread Friday Golf: All 2-digit combinations

Nice approach++ You can lose a few from that though, for 39.
$_=9;for$a(0..9){$_.=join $a,$a..9}print
123456789 123456789 123456789 123456789 123456789

29.
print+9,map{join$_,$_..9}0..9
123456789 123456789 123456789 123456789 123456789


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: All 2-digit combinations (29)

Replies are listed 'Best First'.
Re: Re: Re: Friday Golf: All 2-digit combinations (29)
by Anonymous Monk on Sep 28, 2003 at 06:07 UTC

    One more stroke sh?aved:

    print+join$_,$_..9for+9,0..9

    I tried fiddling with the glob function without success. :-(

    /-\

      You'll have to take my word for it that the masked monk was just l'll ol' me, reformed golf addict eyepopslikeamosquito, who forgot to sign in when responding. D'oh! And I can't accept the lead because: 1) all I did was re-arrange BrowserUk's 29 a little; 2) mtve or thospel probably haven't seen this thread yet. :-)

        Look! A golf!
        $,=$_,print$_..9for+9,0..9
        (26)

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others pondering the Monastery: (6)
As of 2024-04-23 07:41 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found