在一个文件中,比如说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循环.其主要思想是,它可以让你采取行动,就像一个文件的每一行sed或awk.
该-e只包含你的Perl命令.
您也可以进行文件重定向:
perl -pe 's/\d+\./ /g' < xyz.txt > xyz.txt.out
Run Code Online (Sandbox Code Playgroud)
答案(未测试):
perl -ipe "s/\d+\./ /g" xyz.txt
Run Code Online (Sandbox Code Playgroud)