my ($k, $v) = split /=/, $_, 2;