说,我有这样的行:
某事.AA.AA.DARKSIDE 呜呜呜呜呜呜呜呜呜呜呜呜呜呜呜呜呜呜呜呜呜呜呜呜呜呜呜呜呜呜呜呜呜呜呜
我想为每一行找到 $before = $1; $之后 = $2; $middle = ”AA” 例如对于第 1 行,我得到:
$before= “SOMETHING.”
$After = “.AA.DARKSIDE”
并且
$before= “SOMETHING.AA”
$After = “.DARKSIDE”
我的代码如下所示:
$middle = “AA”;
foreach (@lines){
$line = $_;
while ($line =~m/^(.+)$middle(.+)$/g){
$before = $1;
$after = $2;
}
}
有没有一种简单的方法来改变我的正则表达式?PS:$middle
将是一个变量,所以我无法对其进行硬编码。谢谢你的帮助。