Perl的正则表达式修饰符

Question

下面的Perl正则表达式修饰符有什么作用？

/o 

例如，

$string =~ /foo\(\"([^\)]*)\"\)/o) 

什么是/o是什么意思？

Answer 1

它告诉Perl只编译一次表达式。见What is /o really for?。

Answer 2

正则表达式的/ o选项（记录在perlop和perlreref中）告诉Perl仅编译一次正则表达式。这只在模式包含变量时才有用。如果模式没有改变，Perls 5.6和更高版本会自动处理它。

（source）

Answer 3

绝对没有！

它会影响插值，并且没有任何内容插入到该模式中。

如果有插入的东西，/ o会导致插值只发生一次，无论匹配运算符执行多少次。

>perl -E"for (['o','foo'],['a','bar'],['e','neo']) { 
    my ($pat, $s) = @$_; say $s =~ /$pat/ ? $& : 0 }" 
o 
a 
e 

>perl -E"for (['o','foo'],['a','bar'],['e','neo']) { 
    my ($pat, $s) = @$_; say $s =~ /$pat/o ? $& : 0 }" 
o 
0 
o