Select Code to Download

use strict;
use CGI;
...
   my $mimetype = $q->uploadInfo($file)->{'Content-Type'}; # line 804
   return $mimetype;
}

$checks{'data'} =~ tr/\0//d;