Help for this page
binmode STDOUT, ':encoding(utf-8)';
my $xp = XML::XPath->new(xml => $xml) or die "ERROR: XML::XPath cannot parse target file: $!\n"; ... utf8::is_utf8($given_names), $given_names, utf8::is_utf8($surname), $surname; }