$myfile =~ s!([A-Z]+)!<i>$1</i>!g;