Perl中的正则表达式(五)
正则表达式(Regular Expression),在Perl里边通常也叫做模式(Pattern),用来表示匹配(或不匹配)某个字符串的特征模板。
使用简单模式:若模式匹配的对象是$_的内容,只要把模式写在一对斜线(/)中就可以了。
$_ = "yabba dabba doo"; if(/ab\tba/) {print "......";} ##所有在双引号内的特殊字符,都可以在//内使用。
Unicode中的字符的属性,放在\p{PROPERTY}。只要把小写的p改成大写,就表示否定意义。
if(/\p{Space}/) {} ##匹配空白符
if(/\p{Digit}/) {} ##匹配数字
if(/\p{Hex}\p{Hex}/) {} ##匹配十六进制数字的字符集合[0-9A-Fa-f]
元字符:点号(.)匹配任意一个字符的通配符。如果需要仅仅匹配元字符,可以加反斜线\转义。
简单的量词:星号(*)用来匹配前面条目零次或多次。(.*)匹配任意多字符无限次。
加号(+)匹配前一条目一次以上。问号(?)匹配前一条目一次或没有。
大括号{},表示具体的重复次数。 ##/a{5,15}/重复5次到15 次。
##/a{5,}/最少重复一次。
模式分组:可以用圆括号()来对字符串分组。
/fred+/与/(fred)+/ ##匹配不同量
捕获组:可以通过反向引用来引用圆括号中的模式所匹配的文字。
if(/y(.)(.)\2\1/) {print "";} ##\1,\2分别对应顺序的捕获组,按左括号的顺序来标号。匹配进行时的引用
if(/(.)\g{1}11/) {print "";} ##g{1}来显式的指明第一个括号,避免歧义。
if(/(.)(.)\g{-1}11/) {print "";} ##g{-1}相对反向引用,指前一个捕获组中的数据,这样在增加捕获组时,
保证序号不需要改变
择一匹配:竖线(|),要么匹配左边的内容,要么匹配右边的内容。需要加入括号来限制范围。
/fred( |\t)+barney/ ##匹配至少一个空格或制表符或两个。
字符集:指出一组可能出现的字符,写在方括号[]内表示。只匹配单个字符。在一个字符集的首部加入脱字符(^),表示否定含义。
if(/HAL-[0-9]+/) ##匹配数字0-9
[^n\-z] ##除n,连字符,z之外的任何字符。连接字符(-)在[]中含有特殊含义,所以必须加反斜线\转义。
字符集的简写: /HAL-\d+/ ##\d表示任何一个数字字符集的简写,包括ASCII和Unicode。
if(/HAL-[\d]+/a) ##//a表示严格按照ASCII的范围来匹配数字字符。
if(/\s/a) ##\s匹配任意的空白符,/\s/a表示匹配ASCII的空白符。
if(/\R/) ##\R匹配任意的断行符。
if(/\w/) ##\w匹配[a-zA-Z0-9_],主要是匹配Perl所承认的标示符,所以会有下划线_。
相应的反义简写:[^\d], [^\w], [^\s]等价于\D, \W, \S。
if([\d\D]) ##匹配任意的字符,包括换行符,比元字符(.)范围还要广。