Select Code to Download

    my %Y;
 
...
            $Y{$y}++; 
        }
    }

    if (@ARGV) {
        for (@ARGV) { 
...
            next if $y eq $_;  
        }
    }

    for (@ARGV) { 
        $Y{$y}++;
        next if $y eq $_;  
    }