find . -type f -print | xargs perl -pi -e 's/\r//g'