Select Code to Download

@SKIP = ('adrian','adm','sys','alcatel');
foreach $login ($SKIP) {
    next if $login eq $SKIP;
}

@SKIP = grep { $_ ne $SKIP } 'adrian','adm','sys','alcatel';