我想使用 perl 脚本删除文本文件中的换行符

我想使用 perl 脚本删除文本文件中的换行符

在此处输入图片描述

这可以使用 perl one liner 实现吗?

答案1

您可以使用

perl -pne '$_=~s/\n//g; $_=~s/\+//g; END{print "\n";}' filename.txt

解释:

  • perl -pne逐行读取文件,执行给定的命令并输出内容$_
  • comp;删除行末的换行符
  • $_=~s/\+//g;+从线上移除符号
  • END{print "\n";}在文件末尾添加换行符

相关内容