use YAML;
use YAML::Node;
use Data::Dumper;
my $y=new YAML;
$YAML::UseHeader=0;
$YAML::SortKeys=2;
my $y={
data=>[
{rule=>10,
name=>20,
},
],
};
YAML::DumpFile("k.yml",$y);
ってやったんですが
data:
- name: 20
rule: 10
って表示されます

- ruleを先に持ってきたいんですが　アルファベット純になってしまいます
どうすればいいんでしょうか？　ハッシュ宣言の順番のまま使いタイんですが
たすけてください