Select Code to Download

# Read a text file and print it out
while (<$filename>) {
...
while ($bytesread=read($filename,$buffer,1024)) {
   print OUTFILE $buffer;
}

$filename = $query->param('uploaded_file');
$type = $query->uploadInfo($filename)->{'Content-Type'};