Select Code to Download

@mylnxsrvrs = split(',', $myhash{SBLLNXSRVRHOSTS});
@mywinsrvrs = split(',', $myhash{SBLWINSRVRHOSTS});
@mysblroot = split(',', $myhash{SIEBELROOT});
...
printf "$a $lnxsrvr\n\n";}
printf "$lnxsrvr\n";
printf "@mylnxsrvrs";

my $lnxsrvrs = "@mylnxsrvrs";
printf "$lnxsrvrs";