use HTML::Entities qw( _decode_entities );

{
   my %entity2char = (
      %HTML::Entities::entity2char,
      egrave => chr(232),
   );

   sub my_decode_entities {
      return map { _decode_entities($_, \%entity2char } @_;
   }
}