my $aaa = "abcdefghi";
$aaa =~ /([a-z]{3})/g; #わからない
print "[1]$1[2]$2[3]$3\n";

としたときに下記が出力されるようにしたいのですが、正規表現の書き方がわかりません。

[1]abc[2]def[3]ghi

どのように書けばよいでしょうか。