Select Code to Download

my %have_file;
undef @have_file{glob("*")};
my @dont_exist = grep !exists $have_file{$_}, @should_exist;

my @dont_exist = do {
    my %have_file;
    undef @have_file{glob("*")};
    grep !exists $have_file{$_}, @should_exist;
};