Select Code to Download

#/usr/bin/perl -T

...
Host host2 
    hostname host2.mydomain
    User user1

foreach my $indhost( keys %HOSTLIST ){

...
    }
  }
}

# optimised config file

...
user1
user2