Perl_匹配段落前略过的部分$`_匹配段落$&_匹配段落后的部分$'
$`保存了正则表达式引擎在找到匹配段落前略过的部分。
$&保留了匹配成功的部分。
而$'保存了字符串中剩下的、从来没有匹配到的部分。
my $s="aaaaaa{0,1}bbbbb";
if ($s=~/a\{0,1\}/){
print $`."\n";#aaaaa
print $&."\n";#a{0,1}
print $'."\n";#bbbbb
}
Perl_匹配段落前略过的部分$`_匹配段落$&_匹配段落后的部分$'
$`保存了正则表达式引擎在找到匹配段落前略过的部分。
$&保留了匹配成功的部分。
而$'保存了字符串中剩下的、从来没有匹配到的部分。
my $s="aaaaaa{0,1}bbbbb";
if ($s=~/a\{0,1\}/)