perl 正则表达式匹配圆括号 ()368

在 Perl 中，圆括号 () 用于在正则表达式中对子表达式进行分组。这在捕获和提取匹配文本的特定部分时非常有用。

基本用法

要使用圆括号分组子表达式, basta 把子表达式用括号括起来。例如，以下正则表达式匹配包含单词“Perl”的字符串：```
/Perl/
```

但如果我们想要提取单词“Perl”本身，我们可以使用分组：```
/(Perl)/
```

现在，当我们使用此正则表达式时，$1 变量将包含匹配的单词“Perl”。

捕获组

圆括号创建的组称为捕获组。匹配后，可以访问每个捕获组的匹配文本。捕获组编号从 1 开始，其中第一个打开的括号括起来的子表达式是 $1，第二个是 $2，依此类推。

例如，以下正则表达式匹配一个日期，并捕获年、月和日：```
/(\d{4})-(\d{2})-(\d{2})/
```

匹配后，$1 将包含年份，$2 将包含月份，$3 将包含日期。

非捕获组

有时，我们需要对子表达式进行分组，但我们不感兴趣其匹配的内容。在这种情况下，我们可以使用非捕获组，如下所示：```
/(?:Perl)/
```

这样，分组仍然存在，但没有分配给捕获组变量。

嵌套组

圆括号可以嵌套使用来创建多个组。例如，以下正则表达式匹配一个电子邮件地址，并捕获用户名和域名：```
/^(.+)@(.+)$/
```

这里，第一个组捕获用户名，第二个组捕获域名。

后向引用

后向引用允许我们在正则表达式中引用捕获组的匹配内容。语法是 umber，其中 number 是捕获组的编号。例如，以下正则表达式验证一个密码是否与确认密码匹配：```
/^(\w+)$/ \1/
```

这里，\1 表示第一个捕获组，即密码。

贪婪与懒惰匹配

默认情况下，圆括号是贪婪的，这意味着它们会尽可能多地匹配字符。但是，我们可以通过添加一个问号 (?) 使它们变为懒惰，这意味着它们只匹配最少的字符。例如，以下正则表达式匹配一个单词，但会忽略随后的标点符号：```
/\w+(?=\W)/
```

这里，\W 匹配一个非单词字符，(?=) 是一个零宽断言，表示匹配必须紧跟一个非单词字符。

正则表达式引擎

Perl 使用 PCRE (Perl 兼容正则表达式) 引擎，它是一个功能强大的正则表达式引擎，支持广泛的语法和功能。有关 PCRE 的更多信息，请参阅其文档。

示例```perl
# 匹配一个包含数字的字符串
my $str = "The number is 123";
if ($str =~ /\d+/) {
print "The string contains a number: $&";
}
# 捕获一个电子邮件地址中的用户名和域名
my $email = "username@";
if ($email =~ /^(\w+)@(.+)$/) {
print "Username: $1, Domain: $2";
}
# 验证一个密码是否与确认密码匹配
my $password = "password";
my $confirmation_password = "password";
if ($password =~ /^(\w+)$/ && $confirmation_password =~ /^\1$/) {
print "Passwords match";
}
```