perl -p -i.bak -e 's/\$Log/\$History/gi' *