正则表达式模式连接

Question

有可能以某种方式连接这个:

my $ pattern1 = qr/^/;

有了这个:

my $ pattern2 = qr/ABC/

所以我得到(这个值)？

qr/^ABC/

语法可能不同,我只是想实现这个结果.

Answer 1

您可以轻松地连接正则表达式:

say /$pattern1$pattern2/ for 'ABC', 'XABC';

要提高可读性,可以使用/x修饰符并添加空格:

say / $pattern1 $pattern2 /x for qw( ABC XABC );

请注意,标量通常在$符号之后没有空格.