Select Code to Download

use warnings;
use strict;
...
    print "command2 on $server\n";
    system("command2")==0 or die "command2 \$?=$?";
}