YAMLの読み込みと書き出し，ときどきunbless

perl
  • 2008-01-18 訂正・加筆

簡単だけれど多分忘れるからメモ

use YAML;
print Dump($hoge_ref);

use YAML::Syck;
my $hoge_ref = YAML::Syck::LoadFile("hoge.yaml");

# 2008-01-18加筆
# これだけでよい．Syckのほうが高速のはず
use YAML::Syck;

my $hoge = LoadFile("hoge.yaml"); # 読み込み
DumpFile('foo.yaml', $foo);       # 書き出し

YAML::Syck::Dumpもあるはずなのに，なぜか文字化けするので書き出しはYAMLに任せることにした．あ，
blessされていると，Dumperとかしてもきちんと表示されるのね．いらんからunblessしたいと思ったら，そんなに簡単ではないらしい．