在perl中增加字符串末尾的整数

发布时间：2020-12-15 22:00:13 所属栏目：大数据来源：网络整理

导读：我有一个以下格式的字符串： mainstreamfoo.h3 它可能有更多或更少的“部分”,但总是以斜杠后跟一个整数结束.其他例子包括： mainstream2309stream222foo.c45mainfoo.c9 我需要在Perl中增加字符串末尾的数字,然后单独留下其余部分.我在这个网站

我有一个以下格式的字符串：

mainstreamfoo.h3

它可能有更多或更少的“部分”,但总是以斜杠后跟一个整数结束.其他例子包括：

mainstream2309stream222foo.c45

mainfoo.c9

我需要在Perl中增加字符串末尾的数字,然后单独留下其余部分.我在这个网站上找到了一个完全符合我要求的例子(见Increment a number in a string in with regex),只有语言是Javascript.给出的解决方案是：

.replace(/d+$/,function(n) { return ++n })

我需要在Perl中做同样的事情.

解决方法

您可以使用/ e regex修饰符将可执行代码放入替换字符串中.

就像是：

$string =~ s/(d+)$/$1 + 1/e;

应该管用.

（编辑：李大同）

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