in reply to Sloooooow algo in Perl
Do you have some examples with input and output?
update: and is there a special reason you're not using strict?