読者です 読者をやめる 読者になる 読者になる

今日追加した alias

alias yaml2json="perl -MYAML -MJSON -e 'print objToJson(YAML::Load(join \"\",<STDIN>)).\"\\n\"'"
alias json2yaml="perl -MYAML -MYAML::Dumper -MJSON -e '\$d=YAML::Dumper->new;\$d->indent_width(2);print \$d->dump(jsonToObj(join \"\",<STDIN>))'"

絶対もっとうまく書けるとは思う。perl も、zsh のエスケープも。シングルクオートで括ったらわけわからなくなったし、zsh のエスケープがよくわからない。