use v5.16; use charnames ':full'; use List::Util 'all'; say all { fc eq lc } map chr, ord("\N{CYRILLIC CAPITAL LETTER A}")..ord("\N{CYRILLIC SMALL LETTER YA}") __END__ 1