my ($name,$value) = split /=/, $_, 2;