how to upload a file through an html form, again.

[Hytham Shehab]

hi gurus,
    first of all, am really gracefull about all  who sends me tips of how to
make this thing work, but, unfortunately, it doesn't yet.
here it is:
#!/usr/bin/perl
use CGI;
$q = new CGI;
print   $q->header,
 $q->start_html('title here'),
 $q->h1('Please fill this form'),
 $q->start_multipart_form,
 $q->filefield(-name=>'uploaded_file',
                            -size=>50,
                            -maxlength=>80),
 $q->submit,
 $q->end_form,
 $q->hr;
$file=$q->upload('uploaded_file');
if (!$file && $q->cgi_error)

      print $q->header(-status=>$q->cgi_error);
      exit 0;
}
open(FILE, ">/home/eHytham/public_html/upload.it");
while($bytesread=read($file,$buffer,1024)){
 binmode STDOUT;
 binmode FILE;
 print FILE $buffer;
}
close(FILE);

I use my linux mandrak 7 as my client/server, this might be the problem?

Thanks

Hytham Shehab