Вообще XML::Feed делает вот так:
sub find_feeds {
    my $class = shift;
    my($uri) = @_;
    my @feeds = Feed::Find->find($uri)
        or return $class->error(Feed::Find->errstr);
    @feeds;
}

Идём в Feed::Find и видим:
use HTML::Parser;

Скажу честно. Лучше напиши свои регэкспы, - подтягивать HTML::Parser
имеет смысл если только юзаешь его по полной программе и во все дырки.
Тебе нужно переписать на более простое использование

sub _find_links { ... }

Собственно и всё.


---
С искр. ув. Д.Симонов



2011/2/4 Василий Рябов <[email protected]>:
> Во, XML::Feed - то, что нужно. Спасибо!
>
> On 02/04/2011 12:45 PM, Andrew Shitov wrote:
>>
>> my @feeds = XML::Feed->find_feeds('http://example.com/');
>>
>>
>>
>> 2011/2/4 Гнатына Александр<[email protected]>:
>>>
>>> Ну модули видимо так и делают, HTML::RSSAutodiscovery  может оно?
>>> --
>>> С уважением, Гнатына Александр.
>>> В сообщении от 4 февраля 2011 12:41:47 автор Василий Рябов написал:
>>>>
>>>> Я это и подразумевал под "парсингом исходника".
>>>> Думал, может есть модуль какой, который с RSS работает, ну и среди
>>>> прочего такое делает.
>>>> Ну, нет - да и ладно :)
>>>>
>>>> On 02/04/2011 12:38 PM, Andrei wrote:
>>>>>
>>>>> Да, есть. Достаточно парсить заголовок исходника (секцию<head>) на
>>>>> предмет наличия тегов link, описывающий RSS страницы. ;)
>>>>>
>>>>> 4 февраля 2011 г. 10:23 пользователь Василий Рябов<[email protected]
>>>>>
>>>>> <mailto:[email protected]>>  написал:
>>>>>     Всем привет
>>>>>
>>>>>     У меня задача: по урлу определять, есть ли на сайте RSS-лента и,
>>>>>     если есть, получать ее адрес. Понятно, что можно это сделать,
>>>>>     распарсив исходник. Но может быть есть какой-нибудь более
>>>>> элегантный
>>>>>     способ, о котором я не догадываюсь?
>>>>>
>>>>>     Заранее спасибо!
>>>>>     --
>>>>>     Василий Рябов,
>>>>>     [email protected]<mailto:[email protected]>
>>>>>     --
>>>>>     Moscow.pm mailing list
>>>>>     [email protected]<mailto:[email protected]>  | http://moscow.pm.org
>>>>>
>>>>> --
>>>>> Andrei Protasovitski
>>>>> <  andrei[dot]protasovitski[at]gmail[dot]com>
>>>>> Diemen, Netherlands
>>>>>
>>>>>
>>>>>
>>>>> --
>>>>> Moscow.pm mailing list
>>>>> [email protected] | http://moscow.pm.org
>>>
>>> --
>>> Moscow.pm mailing list
>>> [email protected] | http://moscow.pm.org
>>>
>>
>>
>>
>
> --
> Василий Рябов,
> [email protected]
> --
> Moscow.pm mailing list
> [email protected] | http://moscow.pm.org
>
--
Moscow.pm mailing list
[email protected] | http://moscow.pm.org

Ответить