Perl中简体字转换为繁体字（GBK转换成big5）

今天用Perl解决了一个转码出现乱码的问题。需求是将gbk转换成big5.项目源码用的函数是decode()和encode()两个函数。源码如下：

#!/usr/bin/perluse strict;
use warnings;
use Encode qw( encode decode );my $gbk = '我是中国人，我爱中国，自古以来南海是中国不可分割的领土，小美国，日你妹，台湾当然也是中国的，我做的项目GBK转大五码就TM为你们做的';
my $def_code = decode('gbk',$gbk);  #将gbk格式的汉字转换成utf8格式字符，且打开utf8_flag开关
my $big5 = encode('big5',$def_code); #将utf8格式的汉字转换成big5格式字符，且关闭utf8_flag开关open F,">out.txt";print F $big5;print $big5;

输出结果（查看方式为big5编码方式）为：

从输出结果可以看出，这并不是我们想要的结果。

后来改用别的方式，代码如下：

#!/usr/bin/perluse strict;
use warnings;
use Encode::HanConvert;my $gbk = '我是中国人，我爱中国，自古以来南海是中国不可分割的领土，小美国，日你妹，台湾当然也是中国的，我做的项目GBK转大五码就TM为你们做的';
my $big5 = gb_to_big5($gbk);use feature 'say';
open F,">out.txt";
print F $big5;
print $big5;

输出结果为：

注意两个代码的不同与导包的变化。

PS:该方法只适用于大部分的简体中文,对于gbk格式下的繁体字暂时不能解决!!! 若各位网友有好的解决办法或者有兴趣共同研究,欢迎留言,

Perl中简体字转换为繁体字（GBK转换成big5）相关推荐

C#将image中的显示的图片转换成二进制
原文:C#将image中的显示的图片转换成二进制 1.将Image图像文件存入到数据库中我们知道数据库里的Image类型的数据是"二进制数据",因此必须将图像文件转换成字节数组才 ...
java 把ascll转换成char_java中怎么把一个ascii转换成字符串
java中怎么把一个ascii转换成字符串关注:275 答案:3 信息版本:手机版电脑版解决时间 2021-01-18 08:53 提问者壹玍徴戰何亽陪 2021-01-17 22:42 ...
word学习/word如何显示空格/LaTeX格式转为Word格式/ latex中的公式格式如何转换成word中的公式格式/excel复制到word表格过大超出
以windows的word365为例进行讲解,主要分为显示,公式,表格,图片,审阅以及写作方式(含Latex格式转换). 常用快捷键: f4: cmd + y 查找: cmd + shift + h ...
php中html页面时间戳直接转换成具体日期的写法
php中html页面时间戳直接转换成具体日期的写法 **{$v.time|date="Y-m-d H:i:s",###}**
将GBK转换成UTF8
将GBK转换成UTF8 string GBKToUTF8(const std::string& strGBK) { string strOutUTF8 = ""; WC ...
详述在设有快表的请求分页存储管理系统中，一个虚地址转换成物理内存地址的过程。
详述在设有快表的请求分页存储管理系统中,一个虚地址转换成物理内存地址的过程. first() {//检索快表if(找到){修改页表项访问位if(是写指令){修改位置为"1";}us ...
详述在设有快表的请求分页存储管理系统中，一个虚地址转换成物理内存地址的过程。...
详述在设有快表的请求分页存储管理系统中,一个虚地址转换成物理内存地址的过程. first() {//检索快表if(找到){修改页表项访问位if(是写指令){修改位置为"1";}us ...
在Manjaro中Debtap将deb文件转换成pkg文件后，怎么解压生成的.pkg.tar.xz包？
接上篇博客,本篇博客解决的问题如下: 在Manjaro中Debtap将deb文件转换成pkg文件后,怎么处理生成的.pkg.tar.xz压缩包? 解决办法如下: 以我的mnetassist-0.1.1 ...
vue中使用moment处理时间戳转换成日期或时间格式
vue中使用moment处理时间戳转换成日期或时间格式 npm i moment import moment from 'moment' <template><div>< ...

Perl中简体字转换为繁体字（GBK转换成big5）

Perl中简体字转换为繁体字（GBK转换成big5）相关推荐

最新文章

热门文章