perl -pi -e 's,^\s+?$,,' file.txt

##</code><code>##

    perl -pi -e 's,^(\n|\s+)$,,g' file.txt

##</code><code>##

perl -pi -e 's,^\s+$,,' file.txt