>  2005/07/24 (日) 23:31:49        [qwerty]
> > 書けるかなぁ(;´Д`)大分書いてないから
> > open(IN, "c:\temp.txt")
> > open(OUT, ">c:\temp.txt")
> > while($line=<IN>){
> >     $line =~ s/aaaa/bbbb/g;
> >     print OUT $line;
> > }
> > close IN;
> > close OUT;
> > こんなん?(;´Д`)
> おおちゃんとかけてるじゃんヽ(´ー`)ノちょっと全角がおかしいけど

あだめだ(;´Д`)INとOUTのファイル名が同じだった

参考:2005/07/24(日)23時29分37秒