Правила Форума редакция от 22.06.2020 |
|
|
|
|
|
Опции темы | Опции просмотра | Language |
04.11.2008, 19:35 | #1 |
Неактивный пользователь
Регистрация: 04.11.2008
Сообщений: 1
Репутация: 0
|
Вопрос по ссылкам
Помогите, пожалуйста. Нужен скрипт, который выбирал бы с url адреса ссылки и отображал бы их в читаемом виде для дальнейшей обработки. То, что представлено ниже выдает что-то типа: WWW::Mechanize::Link=ARRAY(0x1d07008) WWW::Mechanize::Link=ARR и т.д.
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"; } |
Реклама: | мини имплант | шкафы распашные | как подключить yclients к авито | Conecte Brevo a Perplexity AI | интернет-магазин КНС Нева предлагает CM2200FDW - корпоративные поставки в Санкт-Петербурге. |
21.12.2008, 23:56 | #2 |
Неактивный пользователь
Пол: Регистрация: 21.12.2008
Сообщений: 4
Репутация: 3
|
Re: Вопрос по ссылкам
так примерно:
Код:
use strict; use locale; use LWP::Simple; use HTML::TreeBuilder; my $text = get('http://www.nowa.cc/showthread.php?t=189249'); my $tree = HTML::TreeBuilder->new(); $tree->parse($text); for my $a ( $tree->find_by_tag_name('a') ) { print $a->attr('href') . "\n"; } |
24.12.2008, 19:44 | #3 | |||||||||||||||||||||||
Неактивный пользователь
Пол: Регистрация: 28.12.2007
Сообщений: 43
Репутация: 9
|
Re: Вопрос по ссылкам
Прочитай документацию к WWW::Mechanize http://search.cpan.org/~petdance/WWW-Mechanize-1.52/lib/WWW/Mechanize.pm#$mech-%3Efind_all_links(_..._) Each of the links returned is a WWW::Mechanize::Link object. А вот к нему документация: http://search.cpan.org/~petdance/WWW...hanize/Link.pm |
|||||||||||||||||||||||
Опции темы | |
Опции просмотра | |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Kubuntu не ходит по ссылкам в Инете | chihpyh | Вопросы и проблемы | 3 | 03.02.2010 02:11 |
Как проверить, есть ли по указанным ссылкам файлы на локальном компьютере? | Tend | Архив | 11 | 13.05.2009 01:26 |
Вопрос по last.fm | F_Krause | Скорая помощь | 1 | 09.03.2009 22:52 |
Переход по ссылкам | ribakaba | Архив | 3 | 05.12.2008 14:11 |
|
|