my %params = $raw =~ s/(\s+)\s*=\s*(\S+)/lc($1)/e while ($raw =~ s/(\s+)\s*=\s*(\S+)/);