在進行就地Perl編輯時使用單字符串正則表達式

Question

我使用一次性perl -pi -e命令來執行簡單搜索並從bash腳本中進行替換。我的大多數正則表達式的做工精細，直到我得到這些：

perl -pi -e 's#\<\?mso-application.*\<Table.*Rows="1"\>#\<Table\>#s' 1.xml 
perl -pi -e 's#\</Table.*#\</Table\>#s' 1.xml 

請不要介意＃標記，而不是斜線，我不想逃避，甚至更多的字符。這些正則表達式應該基本上刪除從excel導出的XML文件的塊，但不起作用。這似乎是因爲我使用了適用於字符串的邏輯，並試圖將其應用於文件（儘管我承認我只對perl的就地編輯有基本的瞭解）。

是否有替代方法可以在shell腳本中執行此操作（無論是在perl，awk還是sed中）？

Answer 1

你有perl安裝在行處理模式，但很可能是你試圖匹配跨越多行的模式。您需要擴展perl腳本以讀取整個文件，然後針對整個文件運行正則表達式。

Answer 2

我建議您放棄在命令行上使用正則表達式編輯XML文件的概念，並改用正確的XML解析器。

Answer 3

幾件事情：

• 避免使用正則表達式來操作XML文件，因爲有這份工作更好的工具。考慮使用XML::Simple或XML::Twig模塊來實現相同的需求。
• 看到您有多個搜索和替換操作，請用適當的Perl腳本替換單行程序，然後從您的Bash腳本中調用它。

Answer 4

在命令行中，添加-0777標誌使perl讀取整個文件（並確保您有/ s正則表達式標誌來匹配換行符）。所以：

perl -pi -0777 -e 's#\<\?mso-application.*\<Table.*Rows="1"\>#\<Table\>#s' 1.xml 
perl -pi -0777 -e 's#\</Table.*#\</Table\>#s' 1.xml