如何查找和替換Perl腳本中的多行？

Question

我試圖寫一個perl腳本，用我想要的一些文本替換多行。我寫了下面的代碼，但沒有成功。

s/<cl:doc-meta>(.*)<\/cl:doc-meta>/something/gi; 

這是我要查找和替換

<cl:doc-met> 

<cl:title></cl:title> 

<cl:isbn length="13"></cl:isbn> 

</cl:doc-meta> 

請建議我該怎麼做呢？提前致謝。

Answer 1

使用修飾符「s」 - 視爲單行。

$string =~ s/<cl:doc-meta>(.*)<\/cl:doc-meta>/something/sg;