perl -Mutf8 -E'say lc(uc("\N{LATIN CAPITAL LETTER SHARP S}")) eq lc(uc("SS"))' perl -Mutf8 -E'say fc("\N{LATIN CAPITAL LETTER SHARP S}") eq fc("SS")'