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})/)

Answer 3

甚至

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