水原@ういんずらんどさん、うはくさん、キャメルさん、いろいろ有難う
ございます。同じファイルに書き戻すのはseekを使ったポインタ制御をしな
ければならないので、面倒だ、ということがわかりました！！。
複数行から成るファイルに対しては、読み書き両用は使わないことにします。
     
＞     open(IN,"+<$file")
＞    私の家では「ファイルの内容に変化なし」でした。

＞     open(IN,"+>$file")
＞     私の家では「ファイルが消える」でした。
済みません、その通りです。いろいろとごちゃごちゃ実験している間は確かに
最初書いた通りだったのですが....（ほかの部分が違っているのか？？）