Mailing List Archive: file upload

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