sto2yaml=perl -MYAML -MStorable -e "print Dump @{retrieve ($ARGV[0])};" $*
yaml2sto=perl -e "use YAML (LoadFile); use Storable qw(nstore); @ar = LoadFile($ARGV[0]); nstore(\@ar, $ARGV[1])" $*