perl -p -i.bak -e "s/__MyCompanyName__/davejagoda.com/g;" *