#!perl -p s/ -e//g;s/" "/ /g