You're doing it wrong because you are not paying attention and you are writing sloppy code.

I said in my code comment decode_entities returns something. In your code, you discard the return value, but you need to assign it to a variable or put it as parameter for a function if you want make use of it.

The function is named not deocde_entities, but decode_entities.

Your code is lacking two ; statement separators.

use WWW::Scripter qw();
use HTML::Entities qw(decode_entities);
use Encode qw(encode);

my $w = WWW::Scripter->new;
$w->get('file:///tmp/nhg.euc-jp.html');

print encode('EUC-JP', decode_entities($w->content)); # output octets 
+go to STDOUT, encoded as EUC-JP
[download]