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}";                # €