Help for this page
$x =~ s/(.)/ord $1/egs;
$x =~ s/(.)/sprintf "%03d", ord $1/egs;
$x =~ s/(\d{3})/chr $1/g;