@list = split /(?=PATTERN)/;