delete @hash1{ keys %hash2 };

##</code><code>##

delete $hash1{$_} for keys %hash2;