Select Code to Download

## OLD CODE
sub Store_Results{
...
    while( read($filename, $data, 1024) ){ print STORAGE $data;}
    close STORAGE;
}

my $mime = uploadInfo($File_Name)->{'Content-Type'};