作者garibaldi76 (贾宝迪)
看板Perl
标题Re: [心得] Windows下unicode的txt档案操作
时间Sun Aug 31 04:44:04 2008
之前我遇到这问题有找到一个解法, 好像是\n和unicode相冲所以要加raw参数
open INPUT, '<:raw:encoding(UTF-16LE)', "test.txt" or die "input fail: $!";;
open OUTPUT, '>:raw:encoding(UTF-16LE)', "test2.txt" or die "output fail: $!";
print OUTPUT while(<INPUT>);
close OUTPUT;
close INPUT;
参考
http://www.perlmonks.org/?node_id=649456 而来的
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 123.204.124.229