使用Perl创建指定编码格式(如utf-8)文件的实现代码

190 阅读 0 评论 126 点赞

我是靠谱客的博主曾经大白，这篇文章主要介绍使用Perl创建指定编码格式(如utf-8)文件的实现代码，现在分享给大家，希望可以做个参考。

从而使得有些字符(尤其是宽字符)无法正确地显示，即不再是utf-8格式了。

解决办法：
打开输出文件时即指定编码格式，就不会出现输出文件打开以后乱码的情况了。

普通的默认open输出文件：

复制代码代码如下:

open(OUTPUT,'>>output.txt')||die"can not open the file: $!";

定义指定编码格式文件(或者成为使用Perl创建一个指定编码格式的文件)：

复制代码代码如下:

open OUTPUT, ">:encoding(utf-8)", "output.txt";
print OUTPUT $something;
close OUTPUT;

本图文内容来源于网友提供，作为学习参考使用，或来自网络收集整理，版权属于原作者所有。