Как вы можете искать кодовые точки Unicode по имени в Perl6?

Если вы уже знаете имя кодовой точки, например GREEK SMALL LETTER PHI, вы можете получить символ, используя \c. В getunicode есть эквивалент NQP. Однако есть ли способ, например, найти все ГРЕЧЕСКИЕ СТРОЧНЫЕ БУКВЫ? Я пытался выяснить, где хранятся эти имена, но не нашел их в источниках NQP, Rakudo или MoarVM. Есть идеи?


unicode raku
person jjmerelo    schedule 31.12.2016    source источник
comment
src/strings/unicode_db.c в MoarVM репозиторий (› 1 МБ)   -  person Christoph    schedule 31.12.2016

Ответы (1)


arrow_upward
2
arrow_downward

Вы можете просто просмотреть все кодовые точки Unicode и протестировать их.

(0..0x10FFFF).grep: *.uniname.starts-with('GREEK SMALL LETTER ');

Возможно, вы захотите получить греческие значения в нижнем регистре, а не только те, в имени которых есть GREEK SMALL LETTER.

(0..0x10FFFF).grep: {
  .uniprop('Script') eq 'Greek'
  and
  .uniprop('Lowercase')
}
person Brad Gilbert    schedule 01.01.2017