Help for this page

Select Code to Download

Select or download this

$ perl -E'
    use subs qw( chr );
...
'
A
Died at -e line 5.