Perl的替代品，在換行空格替代品也

Question

我有一個文本文件，其內容如下：

a b 
c 

我用下面的Perl代碼來代替下劃線「 - 」字符在何地的空間字符出現在輸入行：

while (<>) { 
    $_ =~ s/\s/_/; 
    print $_; 
} 

，我得到這樣的輸出：

a_b 
c_ 

所以我的問題我那麼爲什麼Perl會用新行'\ n'char替代下劃線，這在包含'c'的輸入行中很明顯？ 當我在代碼中使用chomp時，它按預期工作。

Answer 1

\s匹配所有空白字符[ \t\r\n\f]，所以如果你想更換普通空間

$_ =~ s/ /_/g; 
# or just 
s/ /_/g; 

翻譯也可以用於這樣的簡單替代，如利用空間。 tr/ /_/;