perl: HTML::Entities decode

use HTML::Entities;
open(F1, ">1.txt");
$a = "Våre norske tegn bør æres";
decode_entities($a);

print F1 $a;


__END__
Våre norske tegn bør æres