Perl——正则表达式(二) [...]

一. 介绍

[...] 用来取方括号中的任意一个

/[abc]we/ #可匹配 awe,bwe,cwe<span class="c"></span>

二. 实例

(1)尽早匹配

"abc" =~ /[cab]/; # 匹配'a',它会尽早匹配

(2) //i 不区分大小写

<pre name="code" class="plain">"yes" =~ /Y[es]/; # 不匹配，因为y与Y不匹配

"yes" =~ /Y[es]/i;# 匹配,//i 不区分大小写

(3) 保留字转义

/[]c]def/; # 匹配 ']def','cdef' 
</pre>$x = 'bcr';<br />/[$x]at/; # 匹配 'bat,'cat',or 'rat'<br />/[$x]at/; # 匹配 '$at' or 'xat'<br />/[$x]at/; # 匹配 'at','bat,or 'rat'<br />

(4) [0-9]
/[0-9]/ ; # 匹配从0到9的任意一个数字
/[a-z]/ ; # 匹配从a到z的任意一个字母
/[A-Z]/ ; # 匹配从A到Z的任意一个字母

(5) [] 与^? 字符的组合使用
/[^a]at/; # 不匹配 'aat' 或 'at',除了这两都其它的类似'bat','cat,'0at','%at'等等都匹配
/[^0-9]/; # 匹配非数字字符
/[a^]at/; # 匹配 'aat' 或 '^at'; 这里 '^' 是一个普能的字符

(6) |
/cat|dog|bird/;  # 匹配"cat" 或 "dog" 或 "bird"