Для знатоков ПЕРЛ и Http запросов.. ПОЖААААЛУЙСТА!!!
 

Привет Метрьі!
извините что не в тот форум, но Перловский форум еле-еле... а других не знаю.. как добрьіх братьев спашиваю..

Почему мой скрипт по адресу 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]

А что должен выдавать? Там погода какая-то...

Сорри что пропал.... просто сайт чето недоступен бьіл...
незнаю..

Вот скрипт которьі анализирует сайт.. там все...

запускаешь
$>perl pars.pl UPXX0017 email SMTPsrever

UPXX0017 - html добавит скрипт - сайт погодьі

в файле alias - записная книга как бьі...
Можно набрать просто Lorex вместо email скрипт подставит мой емейл...

SMTPserver - можно и не вводить см. файл email.conf

например можно:
$>perl pars.pl UPXX0017 Lorex

--------------------

вся загвозка что не могу стянуть Перлом етот сайт!!!
Вьіше подан скрипт... но он не тойвот... перепробовал кучу вариантов... попробуйте ребята, может у вас получится....

СПАСИБО!!!!

а! еще.. делаю из-под Виндовс2000 пока...

Линк поменяй на http://uk.w3.weather.com/weather/local/UPXX0017?x=0&post=post&code=code&y=0

такое не помагает.. пробовал

а мне помогло

а в чем прикол?..
я правда из локально сети интернет имею... всякие тут прокси и брандмауерьі....

но тьі УВЕРЕН что тот сайт стянуло?.. у меня бьіло что тянуло какойтокорневой сайт нашего сервака.. какойто wall.comfort-service.com вместо указанного URL... такое повидение можешь об"яснить?

БУДУ БЛАГОДАРЕН.... как пишет месньій Бредбери в уроках... стану на табуретку и прокричу СПААСССИИИБББОО!

кстати . какой у тебя Перл.. версия.. какя версия LWP?

у меня LWP 5.64
perl v5.6.1

perl 5.6.1, LWP-5.51

В аттаче все файлы. log.html - файл, утянутый с сылки http://uk.w3.weather.com/weather/loc...&code=code&y=0

Ладно сенкс. буду из другого места пробовать тянуть....
чупухня...а у меня твой скрипт вьідает


HTTP/1.1 404 Not Found
Connection: close
Date: Thu, 07 Oct 2004 06:55:42 GMT
Server: Apache/1.3.31 (Unix) mod_perl/1.29 PHP/4.3.8 mod_ssl/2.8.19 OpenSSL/0.9.
7d
Content-Type: text/html; charset=iso-8859-1
Client-Date: Thu, 07 Oct 2004 06:55:46 GMT
Client-Response-Num: 1
Client-Transfer-Encoding: chunked
Title: 404 Not Found

<!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML 2.0//EN">
<HTML><HEAD>
<TITLE>404 Not Found</TITLE>
</HEAD><BODY>
<H1>Not Found</H1>
The requested URL /weather/local/UPXX0017 was not found on this server.<P>
<HR>
<ADDRESS>Apache/1.3.31 Server at wall.comfort-service.com Port 80</ADDRESS>
</BODY></HTML>



:(