リスト、ハッシュ、リファレンスのダンプを出力する
use Data::Dumper;
open(FILEOUT,">:encoding(Shift_JIS)","logfile.txt");
print FILEOUT Dumper($reference);
close(FILEOUT);
use Data::Dumper;
open(FILEOUT,">:encoding(Shift_JIS)","logfile.txt");
print FILEOUT Dumper($reference);
close(FILEOUT);