RosettaCodeData/Task/Unicode-strings/Perl/unicode-strings-1.pl