パイプ喫いの中川さん、ありがとうございました。 > Perl 5 以降に互換ならば最小マッチが使えますね。 > s/^(.*?)：/[$1]/; > > *? は「一番短い文字の繰返し」になります。 これでもいけました。*?なんて書き方もできるのですね。 大変参考になりました。ありがとうございました。 -- naya, sna02388 ＠ nifty.com