my ($var, $value) = split(/\s*=\s*/, $_, 2);