配列の一部を書き換えてファイルに保存する方法は?
$dicname ='GermJ.txt';
open(IN, "$dicname");
@list = <IN>;
close(IN);
読み込んだ配列@listの5番目のデータを'aaaaaaaaaa'に書き換えたいのですが、
$list[5]='aaaaaaaaaaaaaaaaa';
open(OUT, "> $dicname");
foreach (@list)
{ print OUT $_; }
close(OUT);
とやって、ファイルの中身を調べると、6番目の文字列データが5番目の文字列データの後ろにくっついてしまっています。
改行マークを $list[5]='aaaaaaaaaaaaaaaaa',\n;のように行末に追加しても、次の行とのあいだに空間が生まれます。基本的なファイル書き込みの知識をお尋ねして申し訳ありませんが,どうかお教えください。
お礼
ありがとうございました。 はい、妻の戒名には霊位は付けません。 気持ちとしてですが、先祖代々之霊位と彫るので、その文字で悩んでいました。2番でいきます。