我有一个正则表达式
/abc(def)ghi(jkl)mno(pqr)/igs
如何将每个括号的结果捕获到3个不同的变量中,每个括号一个？现在我使用一个数组捕获所有的结果,它们顺序出来,但是我必须解析它们,并且列表可能是巨大的.
@results = ($string =~ /abc(def)ghi(jkl)mno(pqr)/igs);
你的问题对我来说有点模糊,但我想你想做这样的事情：
my (@first,@second,@third);
while( my ($first,$second,$third) = $string =~ /abc(def)ghi(jkl)mno(pqr)/igs) {
push @first,$first;
push @second,$second;
push @third,$third;
}