查找和替换Perl [英] Find and Replace with Perl
问题描述
我正在尝试执行perl one-liner来查找和替换文本而没有太多运气。我想这是因为我的琴弦有很多空格。
这是命令：
找到J：\ testing \1 -name''ap160ws''| xargs perl -pi -e'/ 05 AP520WS-ENTRY-CNT-MAX PIC 9（03）VALUE 100 \。$ / 05 AP520WS-ENTRY-CNT-MAX PIC 9（04）VALUE 1000 \。/ g ''
我想找到：" 05 AP520WS-ENTRY-CNT-MAX PIC 9（03）VALUE 100.
并替换：05 AP520WS-ENTRY-CNT-MAX PIC 9（04）VALUE 1000.
任何帮助都将不胜感激！
I am trying to execute a perl one-liner to find and replace text without much luck. I think it is because my strings have so many spaces.
This is the command:
find J:\testing\1 -name ''ap160ws'' | xargs perl -pi -e ''s/05 AP520WS-ENTRY-CNT-MAX PIC 9(03) VALUE 100\.$/05 AP520WS-ENTRY-CNT-MAX PIC 9(04) VALUE 1000\./g''
I want to find: "05 AP520WS-ENTRY-CNT-MAX PIC 9(03) VALUE 100."
and replace: "05 AP520WS-ENTRY-CNT-MAX PIC 9(04) VALUE 1000."
Any assistance would be greatly appreciated!
推荐答案
/ 05 AP520WS-ENTRY-CNT-MAX PIC 9（04）VALUE 1000 \。/ g''
I想要找到：05 AP520WS-ENTRY-CNT-MAX PIC 9（03）VALUE 100.
并替换：05 AP520WS-ENTRY-CNT-MAX PIC 9（04）VALUE 1000.
非常感谢任何帮助！
/05 AP520WS-ENTRY-CNT-MAX PIC 9(04) VALUE 1000\./g''
I want to find: "05 AP520WS-ENTRY-CNT-MAX PIC 9(03) VALUE 100."
and replace: "05 AP520WS-ENTRY-CNT-MAX PIC 9(04) VALUE 1000."
Any assistance would be greatly appreciated!
我正在尝试执行perl one-liner来查找和替换文本而没有太多运气。我想这是因为我的琴弦有很多空格。
这是命令：
找到J：\ testing \1 -name''ap160ws''| xargs perl -pi -e'/ 05 AP520WS-ENTRY-CNT-MAX PIC 9（03）VALUE 100 \。
I am trying to execute a perl one-liner to find and replace text without much luck. I think it is because my strings have so many spaces.
This is the command:
find J:\testing\1 -name ''ap160ws'' | xargs perl -pi -e ''s/05 AP520WS-ENTRY-CNT-MAX PIC 9(03) VALUE 100\.
/ 05 AP520WS-ENTRY-CNT-MAX PIC 9 （04）VALUE 1000 \。/ g''
我想找到：05 AP520WS-ENTRY-CNT-MAX PIC 9（03）价值100.
并更换：05 AP520WS-ENTRY-CNT-MAX PIC 9（04）价值1000.
任何帮助将不胜感激！
/05 AP520WS-ENTRY-CNT-MAX PIC 9(04) VALUE 1000\./g''
I want to find: 05 AP520WS-ENTRY-CNT-MAX PIC 9(03) VALUE 100.
and replace: 05 AP520WS-ENTRY-CNT-MAX PIC 9(04) VALUE 1000.
Any assistance would be greatly appreciated!
这可以通过替换正则表达式轻松完成。为什么不发布您尝试过的代码，我们会帮助您使用它？
问候，
Jeff
This can be accomplished pretty easily with a replacement regular expression. Why not post the code you have tried and we will help you get it working?
Regards,
Jeff
这篇关于查找和替换Perl的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！
