my (@match) = $str =~ /(?:^foo (?=(?:m \d+ )+bar)|(?