配列をファイルに保存する方法、取り出す方法を教えてください
(1)配列をファイルに保存する方法 (2)保存した配列をファイルから出す方法 がよく分かりません。教えていただけないでしょうか。恐れ入りますがよろしくお願いいたします。
(1) $a = "あ"; $b = "い"; $c = "う"; を(@hairetuに入れて?)ファイルに保存する方法。(ファイルにすでに保存済のデータがあった場合には、消去したいと考えております。)
(2) ファイルを開き、保存されている(@hairetuを取り出し?$a 、$b 、$cに切り分け?)$a 、$b 、$c を再び"あ""い""う""として用いることができるようにする方法
ちなみに、以下のように記述してみたのですが、上手く動作しませんでした。
#####################(1)配列をファイルに保存#################
#!/usr/bin/perl
$file = "file.dat";
$a = "あ";
$b = "い";
$c = "う";
$d = "え";
### $a="あ" $b="い" $c="う" を@hairetuに入れたつもりです。
@hensu = ('$a','$b','$c','$d');
### @hairetuをファイルに保存したつもりです。
open(FILE, "+<$file");
print FILE @hensu;
close(FILE);
##############(2)保存した配列をファイルから出す###############
### ファイルを開き、保存されている@hairetuを取り出したつもりです。
open(FILE, "+<$file");
@hensu = <FILE>;
### @hairetuを再び$a $b $cに切り分けようとしているのですが、これでよろしいでしょうか。
foreach $line (@hensu){
($a,$b,$c,$d) =split(/\,/,$line);
}
close(FILE);
### 確認のため表示
print $a;
print $b;
print $c;
print $d;
### これを実行すると、「あいうえ」でなく「$a$b$c$d」と表示されてしまいます。何処が間違っているのか教えていただけると幸いです。