Select Code to Download

           my $file_time = (stat($full_name))[9];
           my $diff = $now - $file_time;
           $diff = $diff / 86400;
           my $read = localtime($file_time);

my $file_time;
my $diff = ($now - ($file_time = (stat($full_name))[9])) / 86400;
my $read = localtime($file_time);

           $diff = $diff / 86400;
           my $read = localtime($file_time);
...

           } elsif ( $diff > 3 ) {
                 next if (/\.gz/);

              unlink "$full_name";

           my $read = localtime($file_time);