Помогите с ссылками

[mario_315]

Помогите, пожалуйста. Нужен скрипт, который выбирал бы с url адреса ссылки и отображал бы их в читаемом виде для дальнейшей обработки. То, что представлено ниже выдает что-то типа: WWW::Mechanize::Link=ARRAY(0x1d07008) WWW::Mechanize::Link=ARR и т.д.

Код: (Perl)

use strict;
use WWW::Mechanize 0.48;
my $mech = WWW:Mechanize->new();

$mech->get("http://www.somehost.ru/inde.html");

my @links = $mech->find_all_links( url_regex => qr/\.html$/);

for my $link (@links) {
    print $link . "\n";
}

[RXL]

mario_315, разве не понятно, что ты выводишь не ссылку, а массив? Сделай join().

Как альтернативу - посмотри пакет LWP. Для разбора текста - или штатными средствами Perl, или HTML-парсером.