RosettaCodeData/Task/Unicode-strings/Perl/unicode-strings-2.pl
Ingy döt Net 68f8f3e56b all tasks
2013-04-11 01:07:29 -07:00

3 lines
88 B
Perl

$四十二 = "voilà";
print "$四十二"; # voilà
print uc($四十二); # VOILÀ