while (<>)
{
	s/(<\s*\/?\s*)(\w+)/$1\U$2/g;
	print;
}