#!perl -p s/o|s/$& /g