Skip to content

Instantly share code, notes, and snippets.

Avatar

Solomon Foster colomon

View GitHub Profile
@patch
patch / gist:5717017
Last active Dec 18, 2015
character differences with lc or uc before ucfirst
View gist:5717017
# Characters with different values returned from ucfirst if lc is performed first.
# line 1: original character
# line 2: ucfirst
# line 3: lc
# line 4: ucfirst lc
$ perl -C -M'charnames()' -E'say map { "$_ <" . join(", ", map { sprintf "U+%04X %s", ord, charnames::viacode(ord) } split //) . ">\n" } $_, ucfirst, lc, ucfirst lc for grep { ucfirst ne ucfirst lc } map { chr } 0..0x10FFFF'
İ <U+0130 LATIN CAPITAL LETTER I WITH DOT ABOVE>
İ <U+0130 LATIN CAPITAL LETTER I WITH DOT ABOVE>
i̇ <U+0069 LATIN SMALL LETTER I, U+0307 COMBINING DOT ABOVE>