splitting on an empty string will give you an array of chars which you can loop through, looking for the start of your pattern, then the next char of your pattern, etc.
It's kind of.. unsophisticated, but so is examining every character when perl has a perfectly good regex engine.