Help for this page

Select Code to Download

Select or download this

use HTML::Entities;
use HTML::Entities qw( %char2entity %entity2char ); #thanks ikegami
...
foreach $val (keys %char2entity) {
    print "<br>$val => $char2entity{$val}\n";
}

Select or download this
```
encode_entities($a, "\000-\377");
```