It's a value judgement. I thought you valued a routine that works on arbitrary input. You value speed. Evidently, creating the array in my routine is an expensive proposition.

I don't have time right now, but try recasting my algorithm to use index or substr. If you're really pressed for speed, a short XS routine should do the trick.