perl -i pe '...' `find . -type f`