'.tmpfiles' => {
                '3' => {
                       'info' => {
                       'Content-Disposition' => 'form-data; name="file"; filename="C:\\stu\\putty\\stu.txt"',
                       'Content-Type' => 'text/plain'
                                                     },
                'name' => bless( do{\(my $o = '/usr/tmp/CGItemp10026')}, 'TempFile' )
                        }
               },

##</code><code>##

'file' => [
                             bless( \*{'Fh::fh00001C%3A\\stu\\putty\\stu.txt'}, 'Fh' )
                           ],
                 
##</code><code>##

[Wed Dec 11 15:54:14 2002] new_upload.cgi: Use of uninitialized value in die at <<path to script>>/new_upload.cgi line 70.
[Wed Dec 11 15:54:14 2002] new_upload.cgi: Died at <<path to script>>/new_upload.cgi line 70.
:$  

##</code><code>##

  while($bytes=(read($fh, $buffer, 1024)or die $q->cgi_error()))
  {
    $bytes_read += $bytes;
    print OUTFILE $buffer;
  }