$ perl -Mstrict -Mwarnings -E ' binmode STDOUT => "utf8"; say "\N{LATIN SMALL LETTER SHARP S}"; ' ß