Perl正则表达式简化

Question

我想简化以下声明.

if($_=~/^([0-9a-fA-F][0-9a-fA-F][0-9a-fA-F][0-9a-fA-F][0-9a-fA-F])/)

有没有另外一种方法可以在不重复[0-9a-fA-F]的情况下编写上述语句n次？

Answer 1

你可以使用量词

{n}完全匹配n次

if (/^([0-9a-fA-F]{5})/)

同样,您可以使用POSIX字符类

xdigit任何十六进制数字("[0-9a-fA-F]").

if (/^([[:xdigit:]]{5})/)

Answer 2

试试这个

if($_=~/^([0-9a-fA-F]{5})/)