神奇的Perl-正则表达式(7)
声明：本神奇的Perl系列为刘兴(http://deepfuture.iteye.com/)原创，未经笔者授权，任何人和机构不能转载2.1 不捕捉括号使用(?:)来标记那些不需要捕获的模式串。语法如下：
(?:<pattern>) <pattern>为不需要捕获的模式串
以'deep and future'字符串为例，忽略and，直接使用数字标记来捕获字符串
use 5.010;
my $names='deep and future';
if ($names=~m/(\w+) (?:and|or) (\w+)/){
say "我获得了$1 and $2";#(and|or) 不需要捕获，不使用数字标记它
}
2.2 使用自动变量捕捉
使用以下Perl的自动变量完成捕获：
$`表示匹配起始位置之前的字符串
$&表示匹配的内容，即//内的内容
$'表示匹配终结位置之后的内容
比如：
#perl4-9.pl
use 5.010;
#perl4-9.pl
use 5.010;
my $names='hello! deep and future';
if ($names=~m/!\s(\w+)/){
say $`;#捕捉“!”之前的字符串
say $&;#捕捉/!\s(\w+)/匹配的字符串
say $';#匹配/!\s(\w+)/模式串之后的字符串
}
输出结果如下：
hello
! deep
and future
页:
[1]