サンプル #!/usr/bin/perl use strict; use warnings; use utf8; use YAML::Syck; # ハッシュ -> 配列 -> ハッシュの # ネスト構造になっている場合 my $yaml = <