perl -pe "s-\b \b-.-g" FILENAME