![]() |
|
||||||||||
|
|||||||
|
|
« Предыдущая тема | Следующая тема » |
| Опции темы | Опции просмотра |
|
![]() |
|
|||||
|
Регистрация: Aug 2003
Адрес: Украина, Львов
Сообщений: 129
|
Привет Метрьі!
извините что не в тот форум, но Перловский форум еле-еле... а других не знаю.. как добрьіх братьев спашиваю.. Почему мой скрипт по адресу http://uk.weather.com/weather/local/...&code=code&y=0 попросту ниче не вьідает....Береш http://www.yandex.ru/ то мне html файл тутже дает... а по ентом не хочет.. У меня идейка сделать рассьілку Вот скрипт (содран с кнжки Линкольн Д. Штайн Разработка сетевих програм на Perl стр.272) [code] use LWP; my $u='http://uk.weather.com/weather/local/UPXX0017?x=0&post=post&code=code&y=0'; my $ua = LWP::UserAgent->new; my $newagent = 'HTTP/1.0 ('.$ua->agent.')'; $ua->agent($newagent); my $request = HTTP::Request->new(GET=>$u); my $response = $ua->request($request); if ($response->is_success) {$ccc=$response->content;} print $ccc; [code] |
![]() |
Часовой пояс GMT +4, время: 21:21. |
|
|
« Предыдущая тема | Следующая тема » |
|
|