my %values = ($string =~ /(SECTION \d+)\s+(.*?)/sg);