Select Code to Download

my $file = $query->param('upload_file_name');
while (<$file>) {
   print "Got a line: $_";
}