Select Code to Download

#check each file in logs directory
my @to_move;
...
    $file eq '.' || $file eq '..'
    or push @to_move, $file;
}

#check each file in logs directory
my @to_move;
...
    next if $file =~ /^\.\.?$/;
    push @to_move, $file;
}

my @files = grep { -M "$log_dir/$_" > 1 && !/^\.\.?$/ } readdir(LOGS);