Select Code to Download

foreach my $ip (@ipconadd) {
    print "Processing $ip:\n";
    # ...
    print "IP $ip done.\n";
};