s/(.)/sprintf('&#%03d;', ord($1))/ge;