gbk转UTF8问题

fleung

我想用perl把一个GBK编码的中文TXT文件转换成UTF8编码的TXT文件。

perl程序gbk2utf8.pl如下

1. 
   
2. #!/usr/bin/perl
   
3. use Encode;
   
4. use Encode::CN;
   
5. open(utf8file,">utf8.txt");
   
6. while (<>) {
   
7. print utf8file encode("utf-8",decode("GB2312",$_));
   
8. }
   
9. close(utf8file);
   

复制代码

TXT文件名为01.txt，
我用IE打开01.txt文件，在IE中“查看”=》“编码”中选择GB2312，可以正常查看，但是选择“UTF8”显示为乱码，应该说明01.txt是GB2312吧。


01.txt内容很简单，如下：

1. 
   
2. 星期一
   

复制代码

运行

1. 
   
2. ./gbk2utf8.pl 01.txt
   

复制代码

输出错误：
Wide character in subroutine entry at /usr/lib/perl5/5.8.0/i386-linux-thread-multi/Encode.pm line 154, <> line 1.

还请各位高手指教？

maluyao

调用iconv 命令算了