Mate this is good stuff!
Findtok -- mm, for loop? Might be a bit lengthy, but for small strings it wont be too much processing.