ru.cgi.perl

 
 - RU.CGI.PERL ------------------------------------------------------------------
 From : Oleg Alexeenkov                      2:5020/1922.27 13 Nov 2002  21:34:17
 To : Ivan Trifonov
 Subject : Пpокся.
 -------------------------------------------------------------------------------- 
 

 
 Tuesday November 12 2002 16:03, Ivan Trifonov wrote to All:
 
  IT> Hyжен сабж (пеpловая), чем меньше тем лyчше, с минимyмом возможностей
  IT> (пишешь имя файла, она тебе его закачивает), только бы pаботала,
  IT> желательно, чтобы не юзала сокеты. Коpоче чем незаметнее, тем лyчше. И
  IT> вообще, где можно найти инфy по такого pода скpиптам? И вообще, есть
  IT> ли в пpиpоде ноpмальные книги по пеpлy, желательно в электpонном
  IT> ваpианте.
 
 Если вставить заголовки и обработать напильником (особенно строку которую
 передают) то может заработает :)
 почти как в книжке.
 ==
 print url_get($ENV{'QUERY_STRING'});
 sub url_get {
   my ($what) = @_;
   use LWP::UserAgent;
   use URI::URL;
   my $ua = new LWP::UserAgent;
   my $resp = $ua->request( new HTTP::Request('GET', new URI::URL($what),
     new HTTP::Headers(Accept => 'text/plain', User-Agent=>'Browser/1.0')
   ) );
   return $resp->is_success ? $resp->content : $resp->message;
 }
 ==
 
  Пока.. Ик :)
 --- [Shpongle - ..and the day turned to night - Eclipse01] ---
  * Origin: Email= (prollerD0Gmail.ru);ICQ#= (89088275);Fido= (2:5020/1922.27)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

Тема:    Автор:    Дата:    Пpокся.   Ivan Trifonov   12 Nov 2002 17:03:04   Re: Пpокся.   Artem Chuprina   13 Nov 2002 17:37:36   Пpокся.   Ivan Trifonov   14 Nov 2002 11:20:32   Re: Пpокся.   Artem Chuprina   15 Nov 2002 22:05:11   Пpокся.   Oleg Alexeenkov   13 Nov 2002 21:34:17   Пpокся.   Ivan Trifonov   14 Nov 2002 11:35:39