搜索到一个motif,怎么来定位?

搜索到一个motif,怎么来定位?

如下面的一个小程序:
$a="ACAATTTTTTCCAATTAAAAA";
while ($a=~/CCAATT/g) {
        print "$&\n";
}

能够找到,但是,我怎么输出找到的这个motif的所在$a中的位置?
$+[0]
谢谢~~~~
非常感谢~~~~~
在问一下~~~~~
能推荐一下~哪本书~~~什么地方讲到~~~$+[0]~~?
perldoc perlvar