代码之家 › 专栏 › 技术社区 › Todd Hunter

如何处理带有CRLF、NEL线路终端的线路?

shift-jis perl

Todd Hunter · 技术社区 · 16 年前

我需要用shift-jis编码处理一个文件。然而,行结束符的格式我不熟悉。

> file record.CSV 
record.CSV: Non-ISO extended-ASCII text, with CRLF, NEL line terminators

我用的是通用的:

open my $CSV_FILE, "<:encoding(shift_jis)", $filename or die "Could not open: $CSV_FILE : $!";
while (<$CSV_FILE>) {
    chomp;
    # do stuff
}

终止这些类型的文件的正确方法是什么?

2 回复 | 直到 16 年前

Pedro Silva 16 年前

为什么不呢 $_ =~ s/\r// 手动?

编辑:显然,你也可以

require Encode;
use Unicode::Normalize;

s/\x{0085}//g;

NEL: Next Line, U+0085 角色。

user240438 user240438 16 年前

推荐文章

James Finnegan · DateTime对象只能与另一个DateTime对象进行比较

1 年前

con · Negative Lookaward在perl正则表达式中不起作用

1 年前

Carsten · 使用最近的搜索模式更改文本块

1 年前

Mario Palumbo · 是否有bash-perl快捷方式来计算每行中的匹配数?

1 年前

Rawley Fowler · 我可以在Perl中为警告生成堆栈跟踪吗?

2 年前

A.Ellett · 测试-t STDIN与-t<STDIN>

2 年前

nick · 向后交换文件名

2 年前

Sangyong Gwak · 如何更改Perl Kelp应用程序的app_url

2 年前

con · 如何跳转到foreach迭代的特定点?

2 年前

A.G.Progm.Enthusiast · 如何使用Perl中的拼接从数组中一次性删除随机元素?

2 年前