$text =~ s/\x{2122}/(TM)/sg;