Perl正则表达式选项存储在变量中[重复]

Question

有没有办法将正则表达式及其选项存储在标量中？就我而言，我有这个：

{
  regex => 'this is'.CONSTANT_STRING'. a regex',
  someOtherKey => someOtherValue
}

匹配时我这样做：

if($line =~ m/$hash->{regex}/i) {
...
}

效果很好。

但我需要的是选项 /i 存储在正则表达式本身中，所以我可以这样做

if($line =~ $hash->{regex}) {
...
}

但是当我尝试像这样将正则表达式存储在哈希中时：

regex => '/this is a regex/i',

这行不通。我玩过

评估，qr

等等。这有可能做到吗？

Answer 1

您可以将qr 与修饰符一起使用

regex => qr/this is a regex/i,

或者你可以通过?:内联修饰符

regex => '(?i:this is a regex)',
# or
regex => qr/(?i:this is a regex)/,