Perl的替代

Question

我有一個字符串：

test1.domain.com.test1.domain.com 

我想替換字符串domain.com在右側的結果：

test1.domain.com.test1 

當使用Perl字符串替換模式

myString = "test1.domain.com.test1.domain.com"; 
replacedString = "domain.com"; 
resultString = null; 
Perl5Util perl=new Perl5Util(); 
resultString =perl.substitute("s/." + replacedString + "//o",myString); 

但是，Perl將字符串「domain.com」從左到右替換爲結果

test1.test1.domain.com 

有什麼方法可以改變行爲嗎？

Answer 1

匹配字符串的末尾與$。

perl.substitute("s/." + replacedString + "$//o",myString); 

你或許應該逃脫.爲好，因爲.匹配任何字符。您可能需要兩個反斜槓（\\.），否則java字符串會將其視爲特殊字符。如果您不想轉義.，則使用字符選擇語法[.]。

perl.substitute("s/\\." + replacedString + "$//o",myString);