|Perl Monk, Perl Meditation|
Re^3: Puzzle Timeby LanX (Canon)
|on Dec 23, 2012 at 15:25 UTC||Need Help??|
> Allow me one nit-pick:
Yeah I noticed this, but was too tired to correct it. =)
Anyway my guess was wrong (9!+8!+7!+...) you got it right.
> (way faster than my brute force approach).
If it's about speed you can limit the $maxlevel, because the longest number can't have more than 7 digits:
Even your approach with a brute force loop could compete when only considering 7 digits, cause you don't have the overhead of 1 million function calls.
¹) and therefor a 7 digit number excludes 4 to be divisible by 9.