Форум программистов «Весельчак У»
Добро пожаловать,
Гость
. Пожалуйста,
войдите
или
зарегистрируйтесь
.
Вам не пришло
письмо с кодом активации?
1 час
1 день
1 неделя
1 месяц
Навсегда
Рекомендуем проверить настройки временной зоны в вашем профиле (страница "Внешний вид форума", пункт "Часовой пояс:").
У нас больше нет рассылок. Если вам приходят письма от наших бывших рассылок mail.ru и subscribe.ru, то знайте, что это не мы рассылаем.
Начало
Наши сайты
Галерея
Весельчак У
Наша Вики
Хранилище
Проекты
Правила
Правила форума
Правила русского языка
Помощь
Поиск
Календарь
Почта
Войти
Регистрация
Форум программистов «Весельчак У»
>
Программирование
>
Perl
(Модератор:
McZim
) > Тема:
Помогите с ссылками
Страниц: [
1
]
Вниз
« предыдущая тема
следующая тема »
Печать
Автор
Тема: Помогите с ссылками (Прочитано 6641 раз)
0 Пользователей и 2 Гостей смотрят эту тему.
mario_315
Гость
Помогите с ссылками
«
:
04-11-2008 16:13 »
Помогите, пожалуйста. Нужен скрипт, который выбирал бы с 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
"
;
}
«
Последнее редактирование: 04-11-2008 20:18 от RXL
»
Записан
RXL
Технический
Администратор
Offline
Пол:
Re: Помогите с ссылками
«
Ответ #1 :
04-11-2008 20:19 »
mario_315
, разве не понятно, что ты выводишь не ссылку, а массив? Сделай join().
Как альтернативу - посмотри пакет LWP. Для разбора текста - или штатными средствами Perl, или HTML-парсером.
«
Последнее редактирование: 04-11-2008 20:22 от RXL
»
Записан
... мы преодолеваем эту трудность без синтеза распределенных прототипов. (с) Жуков М.С.
Страниц: [
1
]
Вверх
Печать
« предыдущая тема
следующая тема »
Форум программистов «Весельчак У»
>
Программирование
>
Perl
(Модератор:
McZim
) > Тема:
Помогите с ссылками
Загружается...