perl -pi.bak -e 's/\r\n$/\n/' somescript.pl

##</code><code>##

cat -vE somescript.pl