正则表达式匹配重复的字符？

Question

我正在寻找一个perl正则表达式，它将匹配仅由相同字母组成的字符串。

它应匹配aa，aaa，aaaa，aaaaa等，但不是aabb，abba，{{1 }，aaab等等。

我知道我可以使用aaaabaa来引用第一个字符\1，但这也会匹配/(.)\1/。有什么建议吗？

Answer 1

这似乎对我有用：

/^(.)\1*$/

^字符与字符串的开头匹配，$与结尾匹配。

整个表达式可以翻译成：“在字符串的开头，匹配任何字符，后跟任意数量的相同字符，后跟字符串的结尾。