Erm. Did you post the wrong version of your code?
In reply to Re: Re: using s/// as map? by BrowserUk in thread how can I speed up this perl?? by Anonymous Monk