perl -pi  's/\r\n/\n/' $a

##</code><code>##

perl -pi -e 's/\r\n/\n/' filename