Perl正则表达式代替任何字符

Question

基本上，我想将随机字符和k之间的u替换为o。我应该从替换中得到的输出是dudok和rujok。

我如何在Perl中做到这一点？我是Perl的新手，所以对我轻松一点。

这是我现在拥有的：

$text = "duduk, rujuk";
$_ = $text;
s/.uk/ok/g
print $_; //Output: duok, ruok Expected: dudok, rujok

Answer 1

将您的正则表达式更改为：

s/(.=?)uk/$1ok/g;