note CubicSpline <code> @a = (); $_ = 'abbcccddddeeeeeffffffggggggghhhhhhhhiiiiiiiiijjjjjjjjjj'; foreach $digit (a..j) { push @a, eval "tr/$digit/x/"; } </code> <p> ~CS 132969 132969