$HOH{$key}{"name"} = $value;
  push(@{$HOH{$key}{"price"}}, $value2);