perl -pi -w -e 's/find/replace/g;' subdirectory/*.txt