Perl正则表达式从命令行对文件执行操作

Jim*_*Jim 7 unix perl

在一个文件中,比如说xyz.txt我想替换任何数字的模式,然后是一个点示例:1.,2.,10.,11.等等.用空格.如何在命令行上编写一个perl命令来对文件执行上述操作,应该使用什么样的正则表达式?

请帮助谢谢.

Dav*_* W. 22

这是一个Perl oneliner吗?

perl -i -pe  's/\d+\./ /g' <fileName>
Run Code Online (Sandbox Code Playgroud)

Perl命令行选项:-i用于指定输入文件发生的情况.如果您没有给它一个文件扩展名,原始文件将丢失并被Perl munged输出替换.例如,如果我有这个:

perl -i.bak -pe  's/\d+\./ /g' <fileName>
Run Code Online (Sandbox Code Playgroud)

原始文件将以.bak后缀存储,<fileName>本身将包含您的输出.

-p手段在打印循环看起来附上Perl程序有点像这样:

while ($_ = <>) {
    <Your Perl one liner>
    print "$_";
}
Run Code Online (Sandbox Code Playgroud)

这是一个有点简化的解释正在发生什么.您可以通过perldoc perlrun命令行执行a来查看实际的perl循环.其主要思想是,它可以让你采取行动,就像一个文件的每一行sedawk.

-e只包含你的Perl命令.

您也可以进行文件重定向:

perl -pe  's/\d+\./ /g' < xyz.txt > xyz.txt.out
Run Code Online (Sandbox Code Playgroud)


Col*_*ine 5

答案(未测试):

perl -ipe "s/\d+\./ /g" xyz.txt
Run Code Online (Sandbox Code Playgroud)

  • 我个人喜欢输入“perl -pie”,因为它会拼写一个单词,但这并不重要。 (10认同)