Forum Webscript.Ru

Программирование => Perl => Тема начата: GrAfF от 04 Марта 2008, 16:00:39

Название: LWP не шлет большие файлы
Отправлено: GrAfF от 04 Марта 2008, 16:00:39

Доброе!

Понимаю зыбкость вопроса, но надо. =)

Есть код:

Код: [Выделить]


use HTTP::Cookies;
use HTTP::Request::Common;
use LWP::UserAgent;
my $browser = LWP::UserAgent->new;
$browser->proxy(\'http\' => \'http://localhost:8080/\');
$browser->agent(\'Mozilla/4.76 [en] (Win98; U)\');

$response = $browser->post( $url,
            [
            file1 => ["./01.zip"],
            file2 => ["./02.zip"],
            ],Content_Type => \'form-data\'
        );


Штука в том, что всё работало. Но когда надо было отправить файл не в 10 метров, а в 20, LWP перестал посылать.

Код: [Выделить]

POST /index.php HTTP/1.1
Host: **
User-Agent: Mozilla/4.76 [en] (Win98; U)
Content-Length: 34958451
Content-Type: multipart/form-data; boundary=xYzZY
Connection: keep-alive
Posting 34958451 bytes...


После этого на серв не льется файл, а сразу идет ответ.. А браузером шлется отлично, и заголовки там похожие. Кажется что LWP не тянет 20 метров..

Название: LWP не шлет большие файлы
Отправлено: GrAfF от 10 Марта 2008, 17:48:23

Догадался прицепить WGET, проблема в некотором смысле решена. =)