my @line = extract_braketed($text,'{}');