用正则表达式交换字母

发布时间：2020-12-14 06:38:31 所属栏目：百科来源：网络整理

导读：我如何用o和e的字母交换字母o？我只是试过这个，但我不认为这是一个很好的方法。有没有更好的办法？ my $str = 'Absolute force';$str =~ s/e/___eee___/g;$str =~ s/o/e/g;$str =~ s/___eee___/o/g; 输出：Abseluto ferco 使用 transliteration operator：

我如何用o和e的字母交换字母o？

我只是试过这个，但我不认为这是一个很好的方法。有没有更好的办法？

my $str  = 'Absolute force';
$str =~ s/e/___eee___/g;
$str =~ s/o/e/g;
$str =~ s/___eee___/o/g;

输出：Abseluto ferco

使用 transliteration operator：

$str =~ y/oe/eo/;

例如。

$ echo "Absolute force" | perl -pe 'y/oe/eo/'
Abseluto ferco

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!