Search and replace across many files with a perl one-liner