The charnames https://metacpan.org/pod/charnames杂注提供charnames::viacode
返回给定代码点的“最佳”名称
例如
$ perl -Mcharnames=:full -E'say charnames::viacode(ord "A")'
LATIN CAPITAL LETTER A
有没有一种方便的方法可以从 Perl 中发现该名称的所有已知别名?
要获取代码点的 Unicode 别名,可以使用以下命令:
use Unicode::UCD qw( charprop );
my @aliases =
map { s/:.*//sr }
split /,/,
charprop($ucp, "Name_Alias"); # $ucp is the Unicode code point as a number.
例如,这返回SP
对于 U+0020 空间。
完整列表可以找到here http://www.unicode.org/Public/UNIDATA/NameAliases.txt.
对于您可以传递给的所有值\N{}
, see here https://stackoverflow.com/q/41745993/589924.
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)