с кодировкой разобрался, теперь следующий вопрос
#!/usr/bin/perl -w
#use strict;
use XML::RSS::Parser;
print "Content-Type: text/html\\n\\n";
#print "Test RSS";
my $p = new XML::RSS::Parser;
# my $feed = $p->parsefile(\'C:\\usr\\Apache2\\htdocs\\rss\\Business.rss\');
my $feed = $p->parse(\'
http://partners.userland.com/nytRss/business.xml\'); # output some values
my $title = XML::RSS::Parser->ns_qualify(\'title\',$feed->rss_namespace_uri);
print $feed->channel->children($title)->value."\\n";
print "item count: ".$feed->item_count()."\\n\\n";
foreach my $i ( $feed->items ) {
map { print $_->name.": ".$_->value."\\n" } $i->children;
print "\\n";
}
в результате
not well-formed (invalid token) at line 1, column 5, byte 5 at C:/usr/site/lib/X
ML/Parser.pm line 187
причем это для разных источников RSS