[sf-perl] Printing TM trademark symbol in perl

[Francisco Obispo]

if your terminal is UTF8 try this:

perl -e 'use Encode; map { printf(qq{char %d is: %s\n},$_,encode_utf8(chr($_)))} (0..255)'

It will print the first 256 characters.. note that ASCII text is 7-bit so you only have the range 0-127.

Francisco



On Feb 8, 2012, at 6:12 PM, Richard Reina wrote:

> I am needing to print the TM symbol for a trademark into a regular ascii text file and having no luck doing so.  Does anyone know how?
> 
> Thanks for any help.
> _______________________________________________
> SanFrancisco-pm mailing list
> SanFrancisco-pm at pm.org
> http://mail.pm.org/mailman/listinfo/sanfrancisco-pm