Rob Dixon wrote:
> ChrisC wrote:
>> I need to print the COPYRIGHT symbol.  How to go about it?  Tried
>> playing with the following:
>>
>> my $text;
>> $text = chr(hex(0xa9));
>> print "CR *$text*\n";
>>
>> But the script just dies.
> 
> The hex() function expects a string, but you are giving it 0xa9, which is 129,
> and chr(hex('129')) is a wide character.

My apologies. 169 of course.

Rob

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/


Reply via email to