相关疑难解决方法(0)

我想在Perl中用另一个字符串替换一个字符串; 两者的长度相同.我想替换所有出现的字符串(不区分大小写),但我希望保留字母的大小写.因此,如果第一个字母是大写字母,则替换后的第一个字母也是大写字母.

例如,如果我想用"bar"替换"foo",那么我想要那样

foo ==> bar
Foo ==> Bar
FOO ==> BAR

在Perl中有一个简单的方法吗？