$hash{$ebiz_siebel_dns}{site}   = $ebiz_siebel_dns;
$hash{$ebiz_siebel_dns}{ip_now} = $ebiz_siebel_ip;
$hash{$ebiz_siebel_dns}{ip_new} = $ebiz_siebel;

for my $j ( keys(%hash) ){
   print "site -> $j\n"; # $j eq $hash{$j}{site}
   print "$j -> $hash{$j}{ip_now}\n";
   print "$j -> $hash{$j}{ip_new}\n";
}