Beefy Boxes and Bandwidth Generously Provided by pair Networks
laziness, impatience, and hubris
 
PerlMonks  

Re^12: Japanese character in Linux

by Anonymous Monk
on Jul 14, 2011 at 12:31 UTC ( #914335=note: print w/ replies, xml ) Need Help??


in reply to Re^11: Japanese character in Linux
in thread Japanese character in Linux

We have resolved the issue Following changes were done in perl Loader to handle Japanese. Env variable setting :

$ENV{'NLS_NCHAR'} = 'AL32UTF8';

Encoding from Shift JIS to UTF8 after data is fetched from Sybase:

Encode::from_to($sInstrumentNameJ, "shiftjis", "utf8"); #added for te +sting Encode::from_to($sInstrumentShortJ, "shiftjis", "utf8"); #added for t +esting

Binding Japanese data parameters to be passed as below

use DBD::Oracle qw(:ora_types ORA_OCI SQLCS_NCHAR ); $dbGOSTky_sth->bind_param(":sInstrumentNameJ",$sInstrumentNameJ,{ora_c +sform => SQLCS_NCHAR}); $dbGOSTky_sth->bind_param(":sInstrumentShortJ",$sInstrumentShortJ,{ora +_csform => SQLCS_NCHAR});


Comment on Re^12: Japanese character in Linux
Select or Download Code

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://914335]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others chanting in the Monastery: (12)
As of 2014-11-28 10:21 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My preferred Perl binaries come from:














    Results (195 votes), past polls