perl在solaris上从oracle的一个表读记录写到另一个表，结果成了乱码，谁能帮帮我？

yfwill

UID: 533
帖子: 32
积分: 73
在线时间: 1 小时

1^# yfwill 发表于 2008-05-20 11:16

perl在solaris上从oracle的一个表读记录写到另一个表，结果成了乱码，谁能帮帮我？

Oracle安装在solaris上，perl也在同一个机器上运行
Oracle的字符集是utf-8

solaris的本地环境为：
bash-3.00$ locale
LANG=C
LC_CTYPE="C"
LC_NUMERIC="C"
LC_TIME="C"
LC_COLLATE="C"
LC_MONETARY="C"
LC_MESSAGES="C"
LC_ALL=

apile

UID: 42255
帖子: 66
积分: 151
在线时间: 6 小时

2^# apile 发表于 2008-05-20 11:26

建议你perl里面用Encode的encode/decode转成unicode..

另外你用perl显示在console吗？如果是的话..用Encode转码成C...
如果是WEB的话..试着改Browser的Encode成 utf-8...

yfwill

UID: 533
帖子: 32
积分: 73
在线时间: 1 小时

3^# yfwill 发表于 2008-05-20 11:29

不在console和web上显示，后台处理，我都是用plsql developer查询，原来表里的数据可以正常显示，新写的就是乱码。

apile

UID: 42255
帖子: 66
积分: 151
在线时间: 6 小时

4^# apile 发表于 2008-05-20 11:37

编码被改过了..用Encode把他转成utf-8

yfwill

UID: 533
帖子: 32
积分: 73
在线时间: 1 小时

5^# yfwill 发表于 2008-05-20 14:10

还是没有搞定, 读取的时候用需要解码吗？我是吧数据库内容读到变量，再把变量写到数据库。来源和目标都在同一个实例，读的时候要decode的吗？写的时候需要encode吗？

flw

UID: 21204
帖子: 144
积分: 331
在线时间: 1 天 4 小时

6^# flw 发表于 2008-05-20 14:16

既然都在一个实例，为啥还要将数据经过 Perl？
直接 insert ......... select .... from ...... where ..... 不就完了嘛。

yfwill

UID: 533
帖子: 32
积分: 73
在线时间: 1 小时

7^# yfwill 发表于 2008-05-20 14:22

楼上说的有理，不过是要拿出了别的数据比较，有差异的才写到另一个表里。

apile

UID: 42255
帖子: 66
积分: 151
在线时间: 6 小时

8^# apile 发表于 2008-05-20 20:53

以下是我以Informix 的角度来猜为甚麽？..oracle也许不一样...

连线Informix 数据库的时候一般都会指定CLIENT_LOCALE ,与DB_LOCALE..环境变量..
有时候会看LANG是什麽, 决定要用什麽编码取数据...正常都会指定..(你查一下ORACLE的书, 应该有类似的设定)

我看你的LANG=C 而不是用UTF-8编码..
所以Perl会告诉Informix , Client端的编码是ISO_8859_1，
所以取出的数据编码会变成ISO_8859_1 编码..
再存回去...就会以SERVER_LOCALE存进去..不指定的话..会变成 iso_8859_1回存回去...

也许只要增加几个环境变量..就能解决..

yfwill

UID: 533
帖子: 32
积分: 73
在线时间: 1 小时

9^# yfwill 发表于 2008-05-21 12:09

encode("utf8",decode("ISO_8859_1",$var)) 这样还不行，而且各种编码试过了很多了