DeadMage
Сообщений: 1
Оценки: 0
Присоединился: 2007-07-15 22:01:48.666666
|
Поставил на локалхост ActivePerl v5.6.1 с помощью PPM поставил модуль XML::RSS, написал простенкий скрипт: use strict;
use LWP::UserAgent;
use XML::RSS::Parser;
my $url="http://localhost/rss.xml";
my $ua=LWP::UserAgent->new();
my $response=$ua->get($url);
die $response->status_line . "\n"
unless $response->is_success;
my $rss=XML::RSS:Parser->new;
$rss->parse($response->content);
foreach my $item (@{$rss->{'items'}}){
print "title: $item->{'title'}\n";
print "link: $item->{link}\n";
} Потом: %perl myscript.pl На что мне вываливается: not well-formed at line 7, column 16, byte 198 at G:/perl/site/lib/XML/Parser.pm line 168 Пытался обновить XML::Parser, но вроде как этот модуль up to date. Вот такие пироги(((
|