Как перечислить все канонически эквивалентные последовательности Unicode в Perl?

Существует ли стандартный модуль или функция Perl, которая, учитывая Unicode Combining Character Sequence (или, в более общем смысле, произвольный текст Unicode строка), будет сгенерирован список всех канонически эквивалентных строк?

Например, если задан символ U + 1EAD,Я хотел бы получить список всех этих канонически эквивалентных последовательностей:

0061 0302 0323
0061 0323 0302
00E2 0323
1EA1 0302
1EAD

(меня не особо волнует, является ли интерфейс массивами USV или строками utf.)

9
задан Bob Hallissy 21 June 2011 в 00:37
поделиться