In article <87659789nd.fsf@ace.nerimadors.or.jp> TANAKA Jiro <jiro@nerimadors.or.jp> writes:

> g があるってことは、繰り返したいのかなぁ？

説明が抜けてました。繰り返したいのです。

> while(s/(.*[^ ])(AGGA)/$1 $2 / > 0) { }

In article <3989923news.pl@insigna.ie.u-ryukyu.ac.jp> kono@ie.u-ryukyu.ac.jp (Shinji KONO) writes:

>  DB<<<49>>> s/([^ ]+)(AGGA)/$1 $2 /g while ($&)

のふたつを合成して、

while (s/([^ ]+)(AGGA)/$1 $2 /) { }

とすることで解決いたしました。
久野さん<cc2ilm$1em6@utogw.gssm.otsuka.tsukuba.ac.jp>も
ありがとうございました。

--
    石川　淳            国立感染症研究所
    (Jun Ishikawa)      生物活性物質部第四室
    jun@nih.go.jp       (旧遺伝生化学室)
    Tel. 03-5285-1111   Fax 03-5285-1272
    http://nocardia.nih.go.jp/
    I hate damn sequences!