perl -pi.bak -e "s/\s+//g" names