正则表达式 – Perl中正则表达式的双重插值

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

导读：我有一个Perl程序,它在配置文件中存储正则表达式.它们的形式如下： regex = ^/d+$ 在其他地方,正则表达式从文件中解析并存储在变量 – $regex中. 然后我在检查正则表达式时使用变量,例如 $lValid = ($valuetocheck =~ /$regex/); 我希望能够在配置文件中包含

我有一个Perl程序,它在配置文件中存储正则表达式.它们的形式如下：

regex = ^/d+$

在其他地方,正则表达式从文件中解析并存储在变量 – $regex中.
然后我在检查正则表达式时使用变量,例如

$lValid = ($valuetocheck =~ /$regex/);

我希望能够在配置文件中包含perl变量,例如

regex = ^d+$stored_regex$

但我无法弄清楚如何做到这一点.

当Perl解析正则表达式时,它们会被解释两次.
首先扩展变量,然后解析正则表达式本身.

我需要的是一个三阶段的过程：
首先插入$regex,然后插入它包含的变量,然后解析生成的正则表达式.
前两个插值都需要“正则表达式识别”.例如他们应该知道字符串包含$作为锚等…

有任何想法吗？

使用 eval可以帮到你.看看下面的代码,它可以预编译一个准备用于后者的正则表达式：

my $compiled_regexp;
my $regexp = '^d+$stored_regexp$';
my $stored_regexp = 'a';

eval "$compiled_regexp = qr/$regexp/;";
print "$compiled_regexpn";

运算符qr //可用于预编译正则表达式.它允许您构建它但尚未执行它.您可以先使用它构建regexp,然后再使用它们.

（编辑：李大同）

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