ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Alexei Kozlov                        2:5038/7.10    15 May 2000  21:49:14
 To : All
 Subject : [?] something strange
 -------------------------------------------------------------------------------- 
 

 
 После обновления  модулей libwww и т.п. появилась такая проблема - есть кусок
 кода:
 
 use LWP::UserAgent;
 require HTML::Parser;
 
 $ua = new LWP::UserAgent;
 
 $ua->agent("Netscape (X11 Sun4u)");
 
 $req = new HTTP::Request GET => "http://somehost.ru";
 $res = $ua->request($req);
 
 if ($res->is_success){
         print "OK\n";
 } else {
         print "Error!\n";
 }
 Если, например, somehost.ru не существует, то я получаю сообщение:
 Can't connect to somehost.ru:80 (Bad hostname 'somehost.ru') 
 at /usr/local/lib/perl5/site_perl/LWP/Protocol/http.pm line 33
 
 в 33 строке http.pm 
 - ---cut---
 die "Can't connect to $host:$port ($@)";
 - ---cut---
 
 Hо проблема в том, что это сообщение выдается не в stderr, а в stdout, хотя
 раньше этого не наблюдалось.
 Подскажите, в чем возможная причина глюка и возможные пути избавления от него?
 С уважением, Алексей.
 --- ut---
  * Origin: Nutlet's nest (2:5038/7.10)
 
 

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