Select Code to Download

use File::Find;
my $total_size = 0;
find(sub { $total_size += -s }, $upload_dir );