こう言う時はif_pythonとかif_perlとかを使わせてもらう。運良くvimスクリプトはjsonと相性が良いのでYAMLを読み込み、JSONに変換してvimに戻してあげる。
function! LoadYAML(file)
perl << EOF
use YAML::Syck;
use JSON::Syck qw(Dump);
eval {
VIM::DoCommand("let ret = " . Dump(LoadFile("".VIM::Eval('a:file'))));
};
VIM::DoCommand("let v:errmsg = substitute('$@', \"\\n\", '', 'g')") if $@;
EOF
if !exists('ret')
throw v:errmsg
endif
return ret
endfunction
echo LoadYAML("config.yaml")
戻り値はDictionary形式になります。読み込めなかった場合はthrowしているのでvim7限定になりますがcatchしてやって下さい。
さて、if_perlですがperl510で動かなくなってました。今日パッチを作成してvim-devに送ったのですが、如何せん自信がありません(Shibuya.xsでvimmerな皆様、どうか私にお力をお貸し下さい)。
パッチは
vim72-perl510-fix.diffにあります。不具合報告等あればご連絡下さい。
