Hello,

I am running perl 5.8.5 running on SuSE 9.2 with Apache2.

I have a page on a site where users can upload as many pictures as they like 
via multiple file fields (upto 30).  I am using the cgi class and about every 
3rd picture is not properly referenced by my CGI object.  A dump of the cgi 
object looks as follows:

Fri Mar 30 10:28:53 2007        $cgi = bless( {
                '.parameters' => [
                                   'file1',
                                   'file2',
                                   'file3',
                                   'file4'
                                 ],
                'file1' => [
                             bless( \*{'Fh::fh00001Seating Chart wout 
thrust.jpg'}, 'Fh' )
                           ],
                'file4' => [
                             ''
                           ],
                'file3' => [
                             bless( 
\*{'Fh::fh00003Sheridan_Opera_Hoise_Mani_Floor.gif'}, 'Fh' )
                           ],
                '.tmpfiles' => {
                                 '22' => {
                                           'info' => {
                                                       'Content-Type' => 
'image/gif',
                                                       'Content-Disposition' => 
'form-data; name="file3"; filename="Sheridan_Opera_Hoise_Mani_Floor.gif"'
                                                     },
                                           'name' => bless( do{\(my $o = 
'/usr/tmp/CGItemp5681')}, 'CGITempFile' ),
                                           'hndl' => $cgi->{'file3'}[0]
                                         },
                                 '16' => {
                                           'info' => {
                                                       'Content-Type' => 
'image/gif',
                                                       'Content-Disposition' => 
'form-data; name="file2"; filename="Sheridan_Opera_Hoise_Balcony.gif"'
                                                     },
                                           'name' => bless( do{\(my $o = 
'/usr/tmp/CGItemp5680')}, 'CGITempFile' ),
                                           'hndl' => bless( 
\*{'Fh::fh00002Sheridan_Opera_Hoise_Balcony.gif'}, 'Fh' )
                                         },
                                 '15' => {
                                           'info' => {
                                                       'Content-Type' => 
'image/jpeg',
                                                       'Content-Disposition' => 
'form-data; name="file1"; filename="Seating Chart wout thrust.jpg"'
                                                     },
                                           'name' => bless( do{\(my $o = 
'/usr/tmp/CGItemp5679')}, 'CGITempFile' ),
                                           'hndl' => $cgi->{'file1'}[0]
                                         }
                               },
                'file2' => [
                             $cgi->{'.tmpfiles'}{'16'}{'hndl'}
                           ],
                '.r' => bless( do{\(my $o = 138325528)}, 'Apache2::RequestRec' 
),
                '.charset' => 'ISO-8859-1',
                '.fieldnames' => {},
                'escape' => 1
              }, 'CGI' );


You can see that 'file2' does not seem be properly blessed to a Fh, even though 
the file is listed in the cgi tmpfiles hash.  This case only had three files, 
but I have tried many times with upto 18 files, large & small and every time, 
cgi->upload can't properly grab about every third file.  As a separate test, I 
wrote the post from <STDIN> to a file and all my files were there.
 
Any ideas are greatly appreciated.

Thanks,

Mike




 
____________________________________________________________________________________
Looking for earth-friendly autos? 
Browse Top Cars by "Green Rating" at Yahoo! Autos' Green Center.
http://autos.yahoo.com/green_center/





 
____________________________________________________________________________________
Get your own web address.  
Have a HUGE year through Yahoo! Small Business.
http://smallbusiness.yahoo.com/domains/?p=BESTDEAL
 
_______________________________________________
Boston-pm mailing list
[email protected]
http://mail.pm.org/mailman/listinfo/boston-pm

Reply via email to