foreach $key (keys %Servers){

##</code><code>##

foreach my $key (keys %Servers){

##</code><code>##

$IP="$Server{$key}";