Perl中的替换运算符s ///实际上只是match运算符的扩展,允许您将匹配的文本替换为一些新文本。运算符的基本形式是-
s/PATTERN/REPLACEMENT/;
PATTERN是我们要查找的文本的正则表达式。REPLACEMENT是我们要用来替换找到的文本的文本或正则表达式的规范。例如,我们可以使用以下正则表达式将所有出现的dog替换为cat-
#/user/bin/perl $string = "The cat sat on the mat"; $string =~ s/cat/dog/; print "$string\n";
执行以上程序后,将产生以下结果-
The dog sat on the mat
这是与替换运算符一起使用的所有修饰符的列表。
序号 | 修饰符和说明 |
---|---|
1 | i 使比赛区分大小写。 |
2 | m 指定如果字符串包含换行符或回车符,则^和$运算符现在将匹配换行符边界,而不是字符串边界。 |
3 | o 仅对表达式求值一次。 |
4 | s 允许使用。匹配换行符。 |
5 | x 允许您在表达式中使用空格以保持清晰度。 |
6 | g 使用替换文本替换所有出现的找到的表达式。 |
7 | e 像对待Perl语句一样评估替换项,并将其返回值用作替换文本。 |