Beefy Boxes and Bandwidth Generously Provided by pair Networks
more useful options

Re: Unicode problem

by dakkar (Hermit)
on Jun 19, 2005 at 09:55 UTC ( #468087=note: print w/replies, xml ) Need Help??

in reply to Unicode problem

Works for me, Perl 5.8.2 on Linux. I wrote:

use utf8;

open my $fh,'<:encoding(sjis)','j.sjis.txt';
my $string='言葉';
print index(<$fh>,$string);

saving it as '' as utf-8, and


saving it as 'j.sjis.txt' as shift-jis.

Running it:

$ perl j.sjis.txt

(yes, I used <pre> instead of <code>... but <code> would not let me use character entities, and without the proper characters this answer would be useless)

        dakkar - Mobilis in mobile

Most of my code is tested...

Perl is strongly typed, it just has very few types (Dan)

Replies are listed 'Best First'.
Re^2: Unicode problem
by edis (Acolyte) on Jun 20, 2005 at 01:38 UTC
    Sorry, it was my fault, the short lookup string was incorrect (I can't read Japanese, but need to work with it). Everything works fine now.

    Thanks all for the help.


Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://468087]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others musing on the Monastery: (2)
As of 2016-12-04 07:13 GMT
Find Nodes?
    Voting Booth?
    On a regular basis, I'm most likely to spy upon:

    Results (63 votes). Check out past polls.