my ($key, $value) = split /\s*=\s*/;
 if (m/["']([^'"]+)/) {