foreach my $key (keys %B) { if (exists $A{$key}) { # do something next; } $A{$key} = $B{$key}; } [download]
In reply to Re: adding to hashes by Ieronim in thread adding to hashes by Anonymous Monk