perl -pi.bak -e 's/^M//g' *.xml

##</code><code>##

perl -pi.bak -e 's/^M//g' testfile.html