Select Code to Download

perl -pe 'chomp; $s=!$s,next if s/^\s*<\/?pre>\s*$//i; $_="<p>$_</p>" 
+if $s; $_.="\n";' <in >out

in:              out:
----------------------------------
...
</pre>           </html>
...etc...
</html>