$HoA{ join('_',$swit,$server) } = \@ip_g;