有没有办法在perl中找到正则表达式匹配的所有可能的起始位置？
例如,如果你的正则表达式是“aa”而文本是“aaaa”,它将返回0,1和2,而不是0和2.
解决方法
使用前瞻：
$perl -le 'print $-[0] while "aaaa" =~ /a(?=a)/g'
通常,将除正则表达式的第一个字符之外的所有内容放在(？= …)中.