regex - 如何向带引号的正则 (qr) 表达式添加修饰符

Question

是否有一种简单的方法可以将正则表达式修饰符(例如“i”)添加到带引号的正则表达式中？例如:

$pat = qr/F(o+)B(a+)r/;
$newpat = $pat . 'i'; # This doesn't work

我能想到的唯一方法是 print "$pat\n"然后回来 (?-xism:F(o+)B(a+)r)并尝试删除 ?-xism: 中的“i”用替换

Answer 1

您不能将标志放在 qr 的结果中你已经拥有，因为它受到保护。相反，使用这个:

$pat = qr/F(o+)B(a+)r/i;