perl-embperl mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From Todd White <tmwh...@merit.edu>
Subject file upload
Date Wed, 24 May 2006 21:10:26 GMT
I have a single small working program as a proof of concept for file
uploading using Embperl.  That program is as follows:

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
[-
   $fh = $fdat{testfield};

   while (<$fh>) {
      $content .= $_;
   }
-]
<html>
<head></head>
<body>
<form method="post" enctype="multipart/form-data">
<input type=file name=testfield>
<input type=submit>
</form>

filename: [+ $fdat{testfield} +]<br>
content: [+ $content +]<p>

</body>
</html>
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

When uploading a simple text file, one sees the text of that file printed
next to the "content:" label.

This works on one of our machines but does not work on another and I
cannot determine what it is that causes it to fail on the one machine.

I'll call the two machines M_ONE and M_TWO.  It does NOT work on M_TWO.
Here is a little info on each machine...

M_ONE
============
Apache/1.3.29 (Unix)
mod_perl/1.26
HTML::Embperl 1.3.3
CGI 2.81

M_TWO
============
Apache/1.3.34 (Unix)
Embperl/1.3.6
mod_perl/1.29
mod_ssl/2.8.25
OpenSSL/0.9.7d
HTML::Embperl 1.3.6
CGI 3.04


What happens when run on M_TWO is that nothing is written to the $content
variable.

Any clues anyone can provide will be MOST appreciated.  Thanks.

--Todd M. White

---------------------------------------------------------------------
To unsubscribe, e-mail: embperl-unsubscribe@perl.apache.org
For additional commands, e-mail: embperl-help@perl.apache.org


Mime
View raw message