Forum Webscript.Ru
Программирование => Perl => Тема начата: Yaroslav от 07 Марта 2007, 16:43:49
-
use LWP::Simple;
$file = get("$url");
написал простой скриптик, который загружает указаный файл на сервер, но если файл долго грузится, то браузер выдает ошибку по тайм ауту.
возможно ли сделать что б писалось % загрузки?
-
use LWP::Simple qw($ua get);
$ua->timeout(30);
$file = get("$url");
?
-
perldoc LWP::UserAgent | less -p content_cb