in reply to update a hash with a hash
$hash1{$_} = $hash2{$_} for keys %hash2; [download]
You can also use a hash slice:
@hash1{keys %hash2} = values %hash2; [download]