Unicode characters with Perl
say chr(8364); # € say chr(0x20AC); # € say chr(0b0010_0000_1010_1100); # € use utf8; say '€'; # € say "\x{20AC}"; # € say "\N{EURO SIGN}"; # €
say chr(8364); # € say chr(0x20AC); # € say chr(0b0010_0000_1010_1100); # € use utf8; say '€'; # € say "\x{20AC}"; # € say "\N{EURO SIGN}"; # €