Perl-正则表达式和匹配变量

用户名

早上好家伙,

我有以下代码:

$line =~ s/gene_id "([A-Za-z0-9:\-._]*_[oO])([_.])[0-9]*";/gene_id "$1$21";/g;

我在$ 1和$ 2上遇到问题。我希望输出是$1$21,换言之,$1$21,全部在一起。但是,Perl看到的$21不是$21我将如何避免这个问题?

谢谢。

磨坊主

在变量标识符周围使用花括号将其与周围的文本隔离开, ${2}

$line =~ s/gene_id "([A-Za-z0-9:\-._]*_[oO])([_.])[0-9]*";/gene_id "$1${2}1";/g;

另外,由于您将所有其他文本保持不变,因此仅可以\K用来修改其后的内容。更不用说利用\w以减少您的第一个角色类别:

$line =~ s/gene_id "[\w:\-.]*_[oO][_.]\K[0-9]*";/1";/g;

本文收集自互联网,转载请注明来源。

如有侵权,请联系[email protected] 删除。

编辑于
0

我来说两句

0条评论
登录后参与评论

相关文章

来自分类Dev

Perl正则表达式匹配元音和辅音

来自分类Dev

Perl正则表达式:与此匹配,但不匹配

来自分类Dev

如果正则表达式匹配A而不是正则表达式B,则Perl打印

来自分类Dev

Perl正则表达式:字符串文字包含元字符作为匹配表达式的变量

来自分类Dev

正则表达式匹配后未定义Perl $ 1变量

来自分类Dev

Perl将正则表达式匹配组分配给变量

来自分类Dev

Perl将正则表达式匹配组分配给变量

来自分类Dev

Perl如何为正则表达式匹配结果分配变量

来自分类Dev

Perl正则表达式无法匹配行尾

来自分类Dev

Perl正则表达式以匹配特殊字符

来自分类Dev

打印正则表达式匹配Perl

来自分类Dev

Perl正则表达式匹配范围太广

来自分类Dev

使用正则表达式查找匹配项-Perl

来自分类Dev

Perl正则表达式条件匹配

来自分类Dev

正则表达式在Perl中不匹配

来自分类Dev

Perl迭代正则表达式匹配项的数量

来自分类Dev

Perl正则表达式与\ w +不匹配

来自分类Dev

Perl删除与正则表达式匹配的多行

来自分类Dev

单个冒号的Perl正则表达式匹配项

来自分类Dev

Perl与终端中的正则表达式匹配?

来自分类Dev

Perl正则表达式匹配数组

来自分类Dev

Perl正则表达式匹配数字

来自分类Dev

在Perl中匹配正则表达式的问题

来自分类Dev

在Perl中使用正则表达式进行匹配

来自分类Dev

Perl:正则表达式-将值与字母匹配

来自分类Dev

增强Perl正则表达式以实现平衡匹配

来自分类Dev

正则表达式Perl中的特殊行匹配

来自分类Dev

Perl正则表达式条件匹配

来自分类Dev

正则表达式匹配包含单词perl的“单词”