perl正则表达式中的特殊变量

在perl的正则表达式中有几个非常重要的变量值得注意

1、$_

如果不另外指定，则表示目标串

2、$` :

目标串中当前匹配串之前的字符串

3、$& :

目标串中当前的匹配串

4、$'   :

目标串中当前匹配串之后的字符串

5、$1($2,$3,...$n)

正则分组字符串，以1开始

 

以下为例子

$_ = 'ABcde123D';
if (/([a-z]+)(\d+)/) {
    print "\$1:$1,\$2:$2,\$`:$`,\$&:$&,\$':$'";
}
else{
    print 'not find';
}

 输出：

$1:cde,$2:123,$`:AB,$&:cde123,$':D