perl -l -p -e 's/Microsoft/Micro\$\$\$oft/g' some.txt