Link to home
Start Free TrialLog in
Avatar of Traltixx
Traltixx

asked on

robust upload file without CGI.pm

Hi,
Im trying to make a perl-CGI upload script without the CGI.pm module. I know its easier but I want to understand several things. First my upload.html has several fields (and a file input box) and submits via ENCTYPE="multipart/form-data", so when my CGI grabs it all (from POST) via STDIN, I get some strings like:

-----------------------------7d61b51b10426
Content-Disposition: form-data; name="email_address"

mailadd@hotmail.com
-----------------------------7d61b51b10426
Content-Disposition: form-data; name="Submit"

Submit Form
-----------------------------7d61b51b10426--

I was wondering if anyone has a quick way to parse this? Maybe turn it into hashes or something? Also in this is the binary content of the file I uploaded, so Im also trying to not only get field values, but also upload a file (without the CGI module).
Thanks.
Avatar of ozo
ozo
Flag of United States of America image

could you use CGI::Minimal;
Avatar of Perl_Diver
Perl_Diver

Can you show the code you use that produced the output you posted?
Avatar of Traltixx

ASKER

well, I cant use the CGI module at all, so no, I cant use CGI::Minimal.
And code that produced that?
The perl snippet is:
print "\n\nStandard Input:\n";
if ($ENV{'REQUEST_METHOD'}  eq "POST") {
      read(STDIN, $in, $ENV{'CONTENT_LENGTH'});
      print $in;
      }
and the HTML snippet is something like:

<FORM ACTION="upload.cgi" METHOD="post" ENCTYPE="multipart/form-data">
  File to Upload: <INPUT TYPE="file" NAME="filex">
     <br><br>
      Your Email Address: <INPUT TYPE="text" NAME="email_address">
       <br><br>
        <INPUT TYPE="submit" NAME="Submit" VALUE="Submit Form">
       </FORM>

the CGI::Minimal module is not the CGI module
it isnt? is there an example of how to use/upload files with this?
OK, i've had a look and it seems that CGI::minimal is a whole module alltogether. I suppose I should change my question to, not using CGI.pm or any downloaded modules (because i cant download them).
Is there another way of doing this?
Thanks alot again!
you have to parse the HTTP header *and* the POST data line by line yourself.
From the header you need to get the value of the Content-Type and extract the boundary string.
Then you need to parse the POST data and search the boundary  string followed by a
  Content-Disposition: form-data; name="whatever"
wher "whatever" is your variable name from the HTML form.
While parsing you need to count the bytes of the data you ignore, the remaining ones 'til the value of the Content-Length *or* #til next boundary string is your file's data.

Simple, isn't it?
You better go with a redy-to-use module. Or go and get one and steal the code from there, if you like the hard way ;-)
Why can't you download them?  Is this a homework/assignment question?
I cant download them because its a personal restraint (i.e. im trying to understand CGI more by relying less on modules and doing everything standalone).
That is why i was wondering if anyone knew a quick way of parsing the POST data bymyself since if I did it, i would have missed some things due to the nature of my test cases.
Anyway, it seems that there is a more minimal module than CGI::minimal, namely cgi-lib.pl ( http://cgi-lib.berkeley.edu/#intro )
thanks for the info anyway for cgi::minimal
cgi-lib is a not a particularly good example to study as it is so out of date and doesn't conform to all the latest standards.  It was good in its day when there wasn't any other choice.

If you really want to learn more about CGI, I'd suggest studying the CGI spec

http://www.w3.org/CGI/

and studying the code of CGI::Minimal or CGI (admittedly, it's not particularly easy code to read as it uses many tricks to be as efficient and broad based as possible)
ASKER CERTIFIED SOLUTION
Avatar of Perl_Diver
Perl_Diver

Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
yes, cgi-lib.pl is rather out of date, but it seems to be fine.
Also thanks for the snippet (although it doesnt work really well with uploading file but i found what i was looking for).