Help for this page
Select Code to Download
Select
or
download this
print qq{@{ [ ord $_ ] } => $_\n} for split m{}, $buffer;