Select Code to Download

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

root@bbe78e26dc1f:~/rsh# cat memtest-u2a.pl 

...
Complete documentation for Perl, including FAQ lists, should be found 
+on
this system using "man perl" or "perldoc perl".  If you have access to
+ the
Internet, point your browser at http://www.perl.org/, the Perl Home Pa
+ge.