正则表达式模式连接
Regex pattern concatenation
是否有可能以某种方式连接这个:
my $ pattern1 = qr/^/;
有了这个:
my $ pattern2 = qr/ABC/
所以我得到这个(的值)?
qr/^ABC/
语法可能不同,我只想实现这个结果。
您可以轻松连接正则表达式:
say /$pattern1$pattern2/ for 'ABC', 'XABC';
为了提高可读性,您可以使用 /x
修饰符并添加一个 space:
say / $pattern1 $pattern2 /x for qw( ABC XABC );
请注意,标量通常在 $
标记后不带 space。
是否有可能以某种方式连接这个:
my $ pattern1 = qr/^/;
有了这个:
my $ pattern2 = qr/ABC/
所以我得到这个(的值)?
qr/^ABC/
语法可能不同,我只想实现这个结果。
您可以轻松连接正则表达式:
say /$pattern1$pattern2/ for 'ABC', 'XABC';
为了提高可读性,您可以使用 /x
修饰符并添加一个 space:
say / $pattern1 $pattern2 /x for qw( ABC XABC );
请注意,标量通常在 $
标记后不带 space。