正则表达式和字符大小写

Question

好的,我有一个相当简单的(至少看起来很简单).我有一个多线的字符串,我只是在用其他东西替换不同的单词.让我演示给你看...

#!/usr/bin/perl -w
use strict;

$_ = "That is my coat.\nCoats are very expensive.";
s/coat/Hat/igm;
print;

输出将是
That is my Hat
Hats are very expensive...

第一行的"帽子"不应大写.是否有任何技巧可以使套管符合英语的编写方式？谢谢 :)

Answer 1

请参阅how-to-replace-string-and-preserve-its-uppercase-lowercase

有关更多详细信息,请参阅如何在LHS上保留大小写的情况下对LHS不区分大小写？