Forum Webscript.Ru

Программирование => Perl => Тема начата: Kwazar от 05 Мая 2003, 22:41:32

Название: HTML::LinkExtor вывод результатов в нечитаемом виде
Отправлено: Kwazar от 05 Мая 2003, 22:41:32

В переменной $site хранится Html код страницы (получаю с помощью LWP). Надо из этого кода вытащить и записать в массив все ссылки, заменив относительные пути на абсолютные.
Вот кусок скрипта.

use HTML::LinkExtor;

...

$analyseur = HTML::LinkExtor->new;
$analyseur->parse($site);
@links = $analyseur->links;
print "@links";

В результате я вижу на экране такое:
ARRAY(0x1aef198) ARRAY(0x1aef324) ARRAY(0x1aef120) ARRAY(0x1aef138) ARRAY(0x1aef15c) ARRAY(0x1aef378) ARRAY(0x1aef3b4) ARRAY(0x1ae0b24) ARRAY(0x1ae0b60) ARRAY(0x1ae0b9c) ARRAY(0x1ae0bd8) ARRAY(0x1ae0c14) ARRAY(0x1ae0c50) ARRAY(0x1ae0ee4) ARRAY(0x1adfd98) ARRAY(0x1adfe10) ARRAY(0x1aef264) ARRAY(0x1adfe4c) ARRAY(0x1adfe88) ARRAY(0x1adfec4) ARRAY(0x1adff3c) ARRAY(0x1adfdd4) ARRAY(0x1aef12c) ARRAY(0x1adffb4) ARRAY(0x1adfff0)

Как это перевести в читаемый вид?

И еще. Этот модуль позволяет менять относительные пути на абсолютный, если да - то как? Если нет - то какой и как?

Заранее благодарен за развернутый ответ или хотя бы намек...

Название: HTML::LinkExtor вывод результатов в нечитаемом виде
Отправлено: Chs от 06 Мая 2003, 09:17:30

perldoc Data::Dumper

Название: HTML::LinkExtor вывод результатов в нечитаемом виде
Отправлено: Kwazar от 06 Мая 2003, 09:40:02

Chs
А если perldocs нету? Я все сразу на серваке тестирую...

Название: HTML::LinkExtor вывод результатов в нечитаемом виде
Отправлено: Макс от 06 Мая 2003, 10:10:47

Как можно программить без документации к языку ?
Или установи на сервер доки или локально установи perl с документацией.

Кстати в доке по html::linkExtor написано как сделать абсолютными линки:

$p = HTML::LinkExtor->new([$callback[, $base]])
$base - это базовый URL используемый для создания абсолютных ссылок

Название: HTML::LinkExtor вывод результатов в нечитаемом виде
Отправлено: Kwazar от 06 Мая 2003, 10:40:34

Макс, по памяти...
К сожалению этот модуль я использую в первый раз, потому и дурацкие вопросы задаю.

Название: HTML::LinkExtor вывод результатов в нечитаемом виде
Отправлено: Chs от 06 Мая 2003, 20:25:24

Цитировать

А если perldocs нету? Я все сразу на серваке тестирую...

http://www.perldoc.com/

Название: HTML::LinkExtor вывод результатов в нечитаемом виде
Отправлено: Wyclef от 07 Мая 2003, 09:32:40

Цитировать

Как это перевести в читаемый вид?

Код: [Выделить]


@links = $analyseur->links;

foreach $item (@links) {
print $item->[2], "\\n";
}


Название: HTML::LinkExtor вывод результатов в нечитаемом виде
Отправлено: Kwazar от 07 Мая 2003, 09:35:51

Благодарю.