有没有办法在perl中找到正则表达式匹配的所有可能的起始位置?
例如,如果你的正则表达式是"aa"而文本是"aaaa",它将返回0,1和2,而不是0和2.
显然,你可以做一些事情,比如返回第一个匹配,然后删除所有字符,包括该起始字符,并执行另一个搜索,但我希望有更高效的东西.
使用前瞻:
$ perl -le 'print $-[0] while "aaaa" =~ /a(?=a)/g'
Run Code Online (Sandbox Code Playgroud)
一般情况下,除了正则表达式的第一个字符之外的所有内容(?=...).