Select Code to Download

# Process the form if there is a file name entered
if (my $file = param('filename')) {
...
    }
}

 $filename = $query->param('uploaded_file');
 @stats=stat $filename;
 $size_of_file=$stats[7];