Help for this page

Select Code to Download


  1. or download this
    $ENV{'NLS_NCHAR'} = 'AL32UTF8';
    
  2. or download this
    Encode::from_to($sInstrumentNameJ, "shiftjis", "utf8");  #added for te
    +sting
    
    Encode::from_to($sInstrumentShortJ, "shiftjis", "utf8");  #added for t
    +esting
    
  3. or download this
     
    
    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});