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