my @line = extract_bracketed($text, '<>', qr(.*?(?=<)));