perl -pie 's/old/new/g' ./*/*