substr and chop do only one thing, which means they're much faster than regex engine

Also while...=~/(.)/g; is fastest written as  for  split '',...;,

For a sea of benchmarks/topic/"explanations" about these tricks see Re: How to make this substitutions without splitting the strings? (compute not reckon)