s/([[:alpha:]])/$hash{$1}||$1/ge;

##</code><code>##

s/[[:alpha:]]/$hash{$&}||$&/ge;