Hello Stackflow社区，
我试图在Perl语法中理解正则表达式，我遇到了困惑。
目标：获取A-Z中的所有值，并找到“AAAA”或“ABAAA”或“ZaZZZ”
我目前得到的是：a-z“ABCD”中的任意四个字符
目前错误的代码（x的替换值）：
regex r
r.compile ("[a-z]{4, }")
if r.findfirst(`x`) then return true else return false
感谢您的时间。我在一份新工作中已经研究了很长一段时间，我想在这个领域变得娴熟。
谢谢， 添