Perl——正则表达式(三) (...)

前端之家收集整理的这篇文章主要介绍了Perl——正则表达式(三) (...)前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。

一. 实例

(1)  (...)与 | 组合使用

/(a|b)b/; # 匹配 'ab' 或 'bb'
<pre name="code" class="plain">/(a|)b/; # 匹配 'ab' 或 'b'

 (2)  (...)与 ^ 组合使用 

/(^a|b)c/;   # 匹配 'ac' 在字符串的开始位置 或 'bc' 在字符串任何地方

(3) 获取匹配的值 $1   $2

$time = "16:37:24";
if($time =~ /(\d\d):(\d\d):(\d\d)/) {
	$hours = $1;    #提取 时
	$minutes = $2;  #提取 分
	$seconds = $3;  #提取 秒
}

(4) 反向引用 \g1  \g2

反向引用 用在正则表达式内部

$str = "abcPPabc"
if($str =~ /(abc)PP\g1/) { #true
	print "matches";
}

猜你在找的Perl相关文章