Help for this page

Select Code to Download

Select or download this

# preparation
my %subst = map({ chr($_) => "&#$_;" } 0 .. 255),
...
s/([&<>'"\177-\377])/$subst{$1}/g;

print;

Select or download this
```
ma&#238;tre d&#39;h&#244;tel
```