Select Code to Download

#!/usr/bin/perl
#
...
                }
        }
}

else    {
                                $check = system($comm);
...
                                else    { print "$NAME ok\n";
                        }