爲什麼我不能全部替換字符串，而是取回空字符串？

Question

我想用新行代替所有發生的回車，換行，但是我不行。
嘗試：my $new_string = $old_string =~ s/\r\n/\n/g
給出一個空的$new_sting。
這個：my $new_string = $old_string =~ s/\r\n$/\n/g也不起作用給一個空字符串。
我在這裏搞什麼？

Answer 1

原始嘗試的問題是$old_string與替換運算符（因此它是將被修改的變量）綁定，然後替換運算符的返回值成爲匹配成功的次數。該匹配計數置於$new_string如果匹配失敗，則使用空字符串表示零計數。

您原來的嘗試將工作在最近的Perl版本支持/r修改，只有輕微的修改罰款：

my $new_string = $old_string =~ s/\r\n/\n/gr; 

這修飾符觸發的替換操作了「無損」模式，返回修改的字符串而不是計數。在Perl 5.14中引入了/r修飾符，並在perlop中進行了描述。

在舊版本的Perl，括號可用於操縱的優先級：

(my $new_string = $old_string) =~ s/\r\n/\n/g 

此語法評估my $new_string = $old_string第一，然後使用$new_string與替代結合。

Answer 2

你代上$old_string和$new_string只包含多少換人做，所以使用括號改變運算的優先級，

(my $new_string = $old_string) =~ s/\r\n/\n/g; 

Answer 3

這

my $new_string = $old_string =~ s/\r\n/\n/g 

返回的數替換，而不是新字符串。要查看新字符串，替換後只需print $old_string。

---

從perlop：

s/PATTERN/REPLACEMENT/msixpodualgcer 

搜索模式的字符串，如果找到，替換替換文本和回報換人的號碼進行該模式。 否則它返回false（特別是空字符串）。如果使用/ r（非破壞性）選項，那麼它將在字符串副本上運行替代，而不是返回替換次數，它將返回是否發生替換的副本。當使用/ r時，原始字符串永遠不會更改。即使輸入是對象或綁定變量，副本也將始終爲純字符串。