姓名 CharClass-Perl正则表达式字符类库 概要 use Char::Class::XML qw/InXML_NameStartChar10 InXMLNameChar10/; if ($name !~ /\A\p{InXML_NameStartChar10}\p{InXMLNameChar10}*\z/) { die "$0: $name: This is not an XML 1.0 Name"; } 模组 定义字符类的模块: 字母的字符类。 汉字(CJK表意文字)班。 平假名课程。 Mozilla项目