【发布时间】：2014-06-17 14:52:22
【问题描述】：
如何使用正则表达式在文本中查找带有双字母的单词（例如进度、工具等）？
【问题讨论】：
【发布时间】：2014-06-17 14:52:22
【问题描述】：
my $str = "katttaarww";
my @arr = $str =~ /(.)\1+/g;
print join "~", @arr;
输出
t~a~w
【讨论】：
-
\g1不是更可取吗？ -
@mpapec
\g1而不是\1指的是以前的组 -
@Zaid 无法说明这一点，因为我很少使用第一个，也从不使用第二个。 :)
-
请评论否决票。
使用对单个通配符捕获组的反向引用，见下文：
a = "hello"
a =~ /(.)\1/
【讨论】：