Help for this page

Select Code to Download

Select or download this

use HTML::Entities qw( _decode_entities );

...
my $x = "&#345;";
_decode_entities($x, {});
print("$x\n");

Select or download this

>this_perl script.pl
1
...
>that_perl script.pl
0
&#345;