perl-unicode

Is perl unicode or not?

2002-10-11 07:30:05
Hi, I guess the following question has already been answerd somewher but I 
couldn't find it on the archive. A search feature for the archive would be 
great. After reading 20-30 mails I started to get tired of it. Has anyone 
seen a a mail-archive crawler which can do a search. (That sound almost 
like a fun script to write)

More seriously. I am using 5.6.3 on windows from activestate. I do the 
following.

my $ole_object = ..... ;
my $unicode_string = $ole_object->GetUnicodeString() ;

print length($unicode_string), "\n" ;
# prints 17, which is the length of the unicode string

use byte () ;
print byte::length($unicode_string), "\n" ;
# prints 17, wow, the string is japanese I expect 34

print $unicode_string ;
# prints ??????????????? on the console

print FILE $unicode_string ;
# prints ??????????????? in the file
<<<<<<

What the script is to do is:
1/ get a unicode string from an Ole object
2/ read a unicode string from a file
3/ compare both strings and act upon the comparison

if the string I get from ole _is_ unicode (and it seems so) how can I 
flatten it to binary? I tried with unpack without success.

Nadim.

<Prev in Thread] Current Thread [Next in Thread>