perl -0pe 's/(.*?\n*?([^ \n].*?)\n\n.*|.*?\n([^ \n].*?)\n\n.*)/$1/gs' file.txt

##</code><code>##

perl -0pe 's/(?|.*?\n*?([^ \n].*?)\n\n.*|.*?\n([^ \n].*?)\n\n.*)/$1/gs' file.txt

##</code><code>##

perl -0pe 's/.*?\n([^ \n].*?)\n\n.*/$1/gs' file.txt