use strict; use feature ':5.10'; use XML::Entities; my $string = 'China's eceonomic expansion continues.'; say XML::Entities::decode('all', $string);