Help for this page

Select Code to Download


  1. or download this
    sub utf8_to_latin1 {
    # return( pack("U0C*", unpack(  "U*",@_[0]) ) );
      return( pack(  "C*", unpack("U0U*",@_[0]) ) );
    }
    
  2. or download this
    $native_string  = pack("C*", unpack("U*", $Unicode_string));