while (((my $key1,my $value1)=each(%websites))) { while (((my $key2,my $value2)=each(%newsites))) { if($key1 = $key2) { print "$key2=$value2 \n"; } } }