perl -pi -e 's/\r//g' Filename
##</code><code>##

perl -pi -e 's/\r$//' Filename