perl -i.bak -p -e’s/old/new/g’ *.sh