|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Vitaly Belashov 2:5020/400 18 Jan 2001 21:14:37 To : All Subject : Скачать файл по HTTP, не пойму где грабли -------------------------------------------------------------------------------- Hi ALL! Поправте, где я ошибся. Hолики выводит а 1 нет :( ------------------- #!/usr/bin/perl use HTTP::Request; print "Content-type: text/html\n\n"; $URL = 'http://www.ru/'; print "00000000000000000000000"; $res = request(new HTTP::Request GET => $URL); print "11111111111111111111111"; print header, $res->is_success ? $res->content : $res->status_line; exit; ------------------- Спасибо! Виталий --- ifmail v.2.15dev5 * Origin: Demos online service (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/65777b0d49ff.html, оценка из 5, голосов 10
|