perl -p -e "s/\r$//" (FileName) 

##</code><code>##

perl -p -e "s/\r$//" (FileName) > op;mv op (FileName)