my $re3 = qr{ (?= (? (?<= (?! (? ab+c ) ) (?=(?&lookback)) . | (?=(?&match)) . ) ) ) (? x \d+ ) }msx; my $re3_short = qr /(?=((?<=(?!( ab+c ))(?=(?-2)).|(?=(?-1)).))) (x\d+) /sx;