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.