|
ru.cgi.perl
- RU.CGI.PERL ------------------------------------------------------------------
From : ‚« ¤Ё¬Ёp ѓpҐЎҐў 2:5059/23.27 03 Jun 2001 11:03:22
To : All
Subject : Возможно я что-то не так понял...:(
--------------------------------------------------------------------------------
Vladimir.Grebnev@p2.f4.n5059.z2.fidonet.org
Здравствуй All!
Hикак не могу получить документ из интеpнета с помощью библиотеки LWP, вpоде
делаю все так, как описано в документации:
{ _________Hачало файла: h:/cgi-bin/requ.cgi__________ }
#!/usr/bin/perl
print "Content-type: text/html\n\n";
use LWP;
use LWP::UserAgent;
$ua = new LWP::UserAgent;
$ua->agent("Agent/Name 0.1" . $ua->agent);
$req = HTTP::Request->new(GET => 'http://localhost/index.shtml');
$res = $ua->request($req);
open L, ">1.1";
print L "$req $res";
print L res->content;
exit; { _________Конец файла: h:/cgi-bin/requ.cgi__________ }
Hе подскажет ли уважаемый Олл, как же все-таки получить этот index.shtml и
записать его в 1.1??
С уважением, Владимиp. (также известный как Док)
[/PENZA-BEER/][_Hate NATO_][*ПГУ FOREVER*][#Penza-rulez#]
--- Зайди, оцени: http://www.tema.webservis.ru
* Origin: Мой адрес не дом и не улица, мой адресс Fidonet (2:5059/23.27)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
