perl -e '$tag = "text"; while(<>) {print if(/<$tag/ .. m!</$tag!)}' file.txt

##</code><code>##

      <text xml:space="preserve">some Text ...
.........
.....................
.....................
.....................</text>