note
pijll
Have you tried to insert a <tt>study $string;</tt> outside the loop, before you do the first regex match? This should speed up the matches, especially if <tt>$string</tt> is very long.
<code>
perldoc -f study
</code>
for more information.
412798
412798