my %hash;

while(<>) {
  chomp;
  my ($key, $value) = split('=', $_);
  $hash{$key} = $value;
}