find . -type f -exec perl -pi -we '...' {} \;