perl -MYAML::XS -e 1