UPDATE: I've tracked this down through further testing to a conflict between certain builds of apache and certain versions of CGI.pm. This is discussed on various websites under the error message of

CGI.pm: Server closed socket during multipart read
[download]

Sadly my webhost is technically challenged enough that they don't know how to fix this. Switching to another host where script works. Thanks to all your help.

ORIGINAL MESSAGE
------------------
Hello Monks, I've just discovered you all and hoping someone might have knowledge of my problem. I have some code that runs fine on one hosting company but fails on another: iPowerWeb. I've created a super simple test listed below.

#!/usr/bin/perl
 
use Image::Magick; 
use CGI; 
my $req = new CGI; 

print "Content-type: text/html\n\n";
print "<h1>Test Result</h1>";
print "Everything OK";
[download]

SCENARIO: a simple html form with a single file upload control calls the script above. The script does nothing except ask to use two modules and then ask for a new CGI object.

RESULT: The code works fine with files of less than 15k. It fails with files over 20k. Failure is a 500 server error. Running the script with strict and -w produce no errors or warnings other than the usual "premature end of script headers".

ALTERNATE TEST 1 -- CGI WORKING OK WITHOUT IMAGE MAGICK: Thanks to tips from Monks "Marto" and "Zentara" i tried the exact script as above except i removed the "use Image::Magick" line and added a simple line to test if CGI object was created. Result is that all files upload properly and a cgi object is created properly. So it is the interaction with Image::Magick and CGI that is the problem.

#!/usr/bin/perl
 
use CGI; 
my $req = new CGI; 
my $f    = $req->param("TOPPIX");


print "Content-type: text/html\n\n";
print "<h1>Test Result</h1>";
print "Everything OK $f";
[download]

ALTERNATE TEST 2 -- WORKS IF CGI OBJECT NOT CREATED: Another test with removal of the "my $req = new CGI;" line allows the script to function properly with all file sizes.

#!/usr/bin/perl
 
use Image::Magick; 
use CGI; 

print "Content-type: text/html\n\n";
print "<h1>Test Result</h1>";
print "Everything OK";
[download]

QUESTION: Anyone know why this could be happening? iPowerWeb folks are stumped and have bailed on it. My apologies if this is outside the realm of the monestary's usual consideration. Happy to have found you either way. Many thanks, barry