perl - 用空格替换回车，用分号替换逗号？

Question

我希望能够用空格替换单个字符串(不是整个文件，只是程序中的一个字符串)中的所有行返回(\n's)，并将同一个字符串中的所有逗号替换为分号.

这是我的代码:

    $str =~ s/"\n"/" "/g;
    $str =~ s/","/";"/g;

Answer 1

这样就可以了。您不需要在它们周围使用引号。

$str =~ s/\n/ /g;
$str =~ s/,/;/g;

替换运算符的修饰符选项说明(s///)

e       Forces Perl to evaluate the replacement pattern as an expression. 
g       Replaces all occurrences of the pattern in the string. 
i       Ignores the case of characters in the string. 
m       Treats the string as multiple lines. 
o       Compiles the pattern only once. 
s       Treats the string as a single line. 
x       Lets you use extended regular expressions.