使用perl导入txt数据到mysql（中文）显示乱码

只是一个红薯

如图：
改成

1. open FH,'<:encoding(gbk)','employees.txt';

复制代码

也不行，
mysql中 set names 'gbk'，也不行，不知道哪里编码搞错了

只是一个红薯

回复 2# 芙蓉女侠
这个提示

   

klathleen

这样的导入 直接用mysql 自带的API  load data

只是一个红薯

那就要改txt中的数据了吧？现在就讨论使用perl的情况回复 4# klathleen


   

klathleen

不用改呀...你txt 中的数据不就是以, 分割的嘛...

LOAD DATA LOCAL INFILE 'data.txt' INTO TABLE table_name CHARACTER SET UTF8 FIELDS TERMINATED BY ',';

只是一个红薯

中文导入为空了回复 6# klathleen


   

klathleen

回复 7# 只是一个红薯


    估计还是你的文本字符集问题吧...数据库为utf8的? win下编码默认为gbk吧...你用notepad++ 转下编码再导入试试....

只是一个红薯

文本转成utf8的用load data导入可以正常显示，就是用perl的不好使回复 8# klathleen


   

klathleen

回复 9# 只是一个红薯


    $dbh->do(qq/Set Names utf8/);
    open FL,$file_name or die "$!\n";
    while(<FL>) {
           chomp;
           my ($e,$f,$g,$h) = (split(/\,/,$_));
           $dbh->do(qq/insert into table_name values($e,$f,$g,$h)/);
    }
    $dbh->disconnect;

    首先你确定你的txt为utf8编码...
    如果还是乱码的话 你用Encode 转下试试...