Программирование > Perl

LWP не шлет большие файлы

(1/1)

GrAfF:
Доброе!

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

Есть код:


--- Код: ---
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 метров..

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

Навигация

[0] Главная страница сообщений