$str='((I)(have (two) (children)))';なんていうのを
[[I 1][have [[two 2][children 3]4]5]
みたいにしたいのだけどどうすればいいですか。つまり、
内側の括弧から順番にまた左から右に順番に番号を振っていきたい。
while($str =~ s/\(.*?\)/"[$1 " . ++$num . "]"/eg) {1;}
こうやってもだめですた。