以数字为名的变量保存的是上一次匹配操作(/pattern/)中,第n个小括号中的原符号所匹配内容。
my $str = "<p>hello world !</p>"; #提取中间内容 if ($str =~ /<p>(.*?)</p>/gs)#匹配<p>...</p> { print "$1 mean: $1";#$1 mean: hello world ! }