Re^12: Japanese character in Linux

[Anonymous Monk]

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});