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