perl -pi.bak -e 's/\r//g' ./*