perl – 如何只对文件的第一行进行更改?

前端之家收集整理的这篇文章主要介绍了perl – 如何只对文件的第一行进行更改?前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
我想知道我可以在sed中使用哪种模式来更改第一行巨大文件(〜2 GB).对sed的偏好只是因为我认为它必须比 Python或Perl脚本更快.

文件具有以下结构:

field 1,field 2,... field n
data

并且,鉴于每个字段的标识符中都有空格的可能性,我需要用下划线替换每个空格:

**BEFORE** 
the first name,the second name,the first surname,a nickname,...
data

**AFTER**
the_first_name,the_second_name,the_first_surname,a_nickname,...
data

任何指向正确使用模式的指针,或者另一种脚本解决方案将是巨大的.

解决方法

编辑前10行
sed -i -e '1,10s/ /_/g'

在Perl中,您可以在标量上下文中使用触发器操作符:

perl -i -pe 's/ /_/g if 1 .. 10'

猜你在找的Perl相关文章