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