Help for this page
unless($_ =~ /^\d+\.\d+\.\d+\.\d+/) { unless ($key eq "") { ... } else { push(@rangelist,$_); }
Server1 Name 192.168.100.1/27 ... Server5 Name 10.103.2.4/29 10.104.2.5/27