parsing html form with enctype="multipart/form-data"

[theEclipse]

I was wondering what is needed to parse the incoming data when it is sent with the multipart/form-data enctype.

I have tried parsing the <STDIN>, but to no avail. I would like to stay away from using the CGI.pm because when I parse it, there are a number of things that I want to do.

any ideas?

Robert Carpenter
/b{2}|!b{2}/ - that is the question...

http://www.toyboxhosting.com

robert@convertingchaos.com

http://www.convertingchaos.com

 

[Rieekan]

Try this. Not sure it would work without CGI.pm, but it does the trick.

my $filename = param('file');

my $file = (split/\\/, $filename)[-1];

$file = lc(join '', (split / /, $file));

my ($total_size, $size, $data);

open(SAVE, ">$outputdir/$file") or die "Can't open file: $!";

binmode SAVE;

while($size = read(param('file), $data, 1024))
{
    print SAVE $data;
    $total_size += $size;
}

close(SAVE);

 

[siberian]

For added control you can read the Content-length header and only read that much data.

 

[theEclipse]

yea, the troblesome part is the param(...) part. I think that is reliant on the cgi mod.

The biggest hurdle that I am trying to leap is just parsing information from the form under that encoding.

Robert Carpenter
/b{2}|!b{2}/ - that is the question...

http://www.toyboxhosting.com

robert@convertingchaos.com

http://www.convertingchaos.com

 

[siberian]

Well, multipart/form-data usually means that you have some value pairs. If your just reading a file off a stream I don't think that is the appropriate encoding?

Good luck, feels like your doing it the hard way but I do not have enough info on your implementation to prove it.

 

[theEclipse]

siberan -

I am indeed doing it the hard way. Thanks for your help.

Robert Carpenter
/b{2}|!b{2}/ - that is the question...

http://www.toyboxhosting.com

robert@convertingchaos.com

http://www.convertingchaos.com