Perl替代以打印与regex不匹配的所有内容[已关闭]

amrnrhlw 于 2022-11-15 发布在 Perl

关注(0)|答案(1)|浏览(105)

已关闭。此问题需要details or clarity。当前不接受答案。
**想要改进此问题吗？**通过editing this post添加详细信息并阐明问题。

6个月前关闭。
Improve this question
我正在尝试打印所有与我的正则表达式不匹配的内容。我知道正则表达式很好，但不确定我是否正确理解语法以正确执行它。我得到的打印结果与我使用regex101得到的完全不同。任何想法都将是有帮助的。尝试打印剩余的上下文不匹配，并最终输出到另一个文件，但希望确保我也理解注解。这是我所拥有的...

perl -ne "print s/((0\.0\.0\.0)|(127\.0\.0\.1)|(\|\|)|(#.*)|(\^)|(\h))/m/gi;" a.txt

perl

来源：https://stackoverflow.com/questions/72333595/perl-substitute-to-print-everything-not-matched-with-regex

1条答案

按热度按时间

x4shl7ld1#

这很管用。

perl -pe "s/((0\.0\.0\.0)|(127\.0\.0\.1)|(\|\|)|(#.*)|(\^)|(\h))//gi;" a.txt

赞(0）回复(0）举报 2022-11-15

我来回答

Perl替代以打印与regex不匹配的所有内容[已关闭]

1条答案

相关问题

热门标签

最新问答