Знатокам PERL-CGI: multipart/form-data
Друзья, доброго здоровья!
Подскажите пожалуйста, каким образом вытащить данные из поля формы, переданного как multipart/form-data? Использую для этого CGI.pm, ничего не выходит...
HTTP-запрос (http-req.txt):
POST /~ilya/cgi-bin/post.pm HTTP/1.0
Content-Type: multipart/form-data; boundary=AaB03x
Content-Length: 69
--AaB03x
Content-Disposition: form-data; name="id"
12345
--AaB03x--
CGI-скрипт:
#!/usr/bin/perl -wT
use strict;
use warnings;
use CGI ();
my $query = CGI->new();
print "Content-Type: text/plain; charset=utf-8\n\n";
print "posted data:\n";
print $query->param('id') . "\n";
print "\n";
exit(0);
__END__
# vim: ts=4 filetype=perl
Проверяю с помощью: cat http-req.txt | nc 127.0.0.1 80.
Результат:
HTTP/1.1 200 OK
Date: Mon, 24 Aug 2009 16:22:24 GMT
Server: Apache
Connection: close
Content-Type: text/plain; charset=utf-8
posted data:
Заранее благодарю!
