Perl 正则表达式从命令行作用于文件

Question

在一个文件中，假设 xyz.txt 我想替换任何数字后跟点的模式，例如：1.,2.,10.,11。等等..有一个空格。 如何在命令行上编写一个 perl 命令来作用于文件以执行上述操作，应该使用什么正则表达式？

请帮忙 谢谢。

Answer 1

这必须是 Perl oneliner 吗？

perl -i -pe  's/\d+\./ /g' <fileName>

Perl 命令行选项：-i 用于指定输入文件发生的情况。如果你不给它一个文件扩展名，原始文件就会丢失并被 Perl munged 输出替换。例如，如果我有这样的：

perl -i.bak -pe  's/\d+\./ /g' <fileName>

原始文件将以 .bak 后缀存储，并且 本身将包含您的输出。

-p 表示将 Perl 程序包含在一个打印循环中，该循环看起来SOMEWHAT如下：

while ($_ = <>) {
    <Your Perl one liner>
    print "$_";
}

这是对正在发生的事情的稍微简化的解释。您可以通过从命令行执行 perldoc perlrun 来查看实际的 perl 循环。主要思想是它允许您像 sed 或 awk 一样对文件的每一行进行操作。

-e 仅包含您的 Perl 命令。

您还可以进行文件重定向：

perl -pe  's/\d+\./ /g' < xyz.txt > xyz.txt.out

Answer 2

答案（未测试）：

perl -ipe "s/\d+\./ /g" xyz.txt

Answer 3

都

perl -ipe "s/\d+\./ /g" xyz.txt

和

perl -pie

无法在我的系统上执行。

我使用以下顺序：

perl -i -pe