|
ru.cgi.perl
- RU.CGI.PERL ------------------------------------------------------------------
From : dimka kuvshinov 2:5020/400 18 Aug 2000 16:43:19
To : All
Subject : multipart/from-data LWP FAQ(1/3) 1.10
--------------------------------------------------------------------------------
Привет всем!!
Hарод, посмотрел я на LWP FAQ(1/3) 1.10, попробовал, и ничего не выходит... :(
Есть запароленная страничка скрытыми полями:
<form action="http://www.kuku.ru/account/addimage.html" method=post
enctype="multipart/form-data">
<input type=hidden name="user" value="vovka">
<input type=hidden name="password" value="123321">
<input type=file name=image size=30>
<input name=href value="http://www.kuku.ru" size=30>
<select name=profile>
<option value="1"> 1
<option value="2"> 2
<option value="3"> 3
<input name=ratio value="123456" size=6>
<input name=alt value="submit" size=30>
<input type=submit value="Добавить">
К ней, согласно LWP FAQ, прилагается такой код:
#!/usr/bin/perl -w
$test = "http://www.kuku.ru/account/addimage.html";
$file = "test.gif";
use HTTP::Request::Common qw(POST);
use LWP::UserAgent;
use CGI qw(header -no_debug);
my $req = POST $test,
Content_Type => 'form-data',
Content => [
user => 'vovka',
password => '123321',
image => [$file],
href => 'http://www.kuku.ru',
profile => '1',
ratio => '222222',
alt => 'LaLa fa, eti zvuki...'
];
my $res = LWP::UserAgent->new->request($req);
print header, $res->is_success ? $res->content : $res->status_line;
Пишет(точнее возвращает) что у меня неверный логин/пароль.
Если страничка незапаролена, то все ОК. Скорее всего ошибка в формировании
POST
запроса, в rfc1867 написано такое:
.....
Content-type: multipart/form-data, boundary=AaB03x
--AaB03x
content-disposition: form-data; name="field1"
Joe Blow
--AaB03x
content-disposition: form-data; name="pics"
Content-type: multipart/mixed, boundary=BbC04y
--BbC04y
Content-disposition: attachment; filename="file1.txt"
Content-Type: text/plain
... contents of file1.txt ...
--BbC04y
Content-disposition: attachment; filename="file2.gif"
Content-type: image/gif
Content-Transfer-Encoding: binary
...contents of file2.gif...
--BbC04y--
--AaB03x--
.....
Как можно сформировать такой запрос правильно???
Спасибо!
--
Отправлено через сервер Talk.Ru - http://www.talk.ru
--- ifmail v.2.15dev5
* Origin: Talk.ru (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
