Re: Friday Golf: All 2-digit combinations

[vanwie]

49:

$_=9;for($x=0;$x<=9;$x++){$_.=join $x,$x..9}print

123456789 123456789 123456789 123456789 123456789

[BrowserUk]

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.

[Anonymous Monk]

One more stroke sh?aved:

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

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

/-\

[eyepopslikeamosquito]

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. :-)