s!(</?)([^/>])!$1\U$2!g;

##</code><code>##

s!(</?)([^/>])!$1.uc($2)!eg;