Форум программистов «Весельчак У»
  *
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Вам не пришло письмо с кодом активации?

  • Рекомендуем проверить настройки временной зоны в вашем профиле (страница "Внешний вид форума", пункт "Часовой пояс:").
  • У нас больше нет рассылок. Если вам приходят письма от наших бывших рассылок mail.ru и subscribe.ru, то знайте, что это не мы рассылаем.
   Начало  
Наши сайты
Помощь Поиск Календарь Почта Войти Регистрация  
 
Страниц: [1]   Вниз
  Печать  
Автор Тема: Помогите разобраться с регуляркой  (Прочитано 9345 раз)
0 Пользователей и 1 Гость смотрят эту тему.
xzfrqtn7
Интересующийся

ru
Offline Offline

« : 28-05-2010 23:47 » 

Собственно, есть код:
Код:
var code='<style>'
+'#btbashtelrucontext {padding:0; font-size:14px; color:#fff; border:0;}'
+'#btbashtelrucontext td {width:20px; height:2px; border:0; }'
+'</style>'
+'<table id="btbashtelrucontext" cellspacing="0" cellpadding="0" border="0">'
+' <tr><td>'
+' <a style="color:#fff;" href="http://bt.bashtel.ru/code/?tps=context&ids=1205&aid=12&s=uclaohh7urlmdjo6en23vr7eb6">Отдаешь свой голос паре №1</a><br />'
+' <a style="color:#fff;" href="http://bt.bashtel.ru/code/?tps=context&ids=1205&aid=11&s=uclaohh7urlmdjo6en23vr7eb6">Отдаешь свой голос паре №2</a><br />'
+' <a style="color:#fff;" href="http://bt.bashtel.ru/code/?tps=context&ids=1205&aid=10&s=uclaohh7urlmdjo6en23vr7eb6">Отдаешь свой голос паре №3</a><br />'
+' <a style="color:#fff;" href="http://bt.bashtel.ru/code/?tps=context&ids=1205&aid=11&s=uclaohh7urlmdjo6en23vr7eb6">Отдаешь свой голос паре №4</a><br />'
+' <a style="color:#fff;" href="http://bt.bashtel.ru/code/?tps=context&ids=1205&aid=11&s=uclaohh7urlmdjo6en23vr7eb6">Отдаешь свой голос паре №5</a><br />'
+' <a style="color:#fff;" href="http://bt.bashtel.ru/code/?tps=context&ids=1205&aid=10&s=uclaohh7urlmdjo6en23vr7eb6">Отдаешь свой голос паре №6</a><br />'
+' <a style="color:#fff;" href="http://bt.bashtel.ru/code/?tps=context&ids=1205&aid=10&s=uclaohh7urlmdjo6en23vr7eb6">Отдаешь свой голос паре №7</a><br />'
+' <a style="color:#fff;" href="http://bt.bashtel.ru/code/?tps=context&ids=1205&aid=11&s=uclaohh7urlmdjo6en23vr7eb6">Отдаешь свой голос паре №8</a><br />'
+' </td></tr>'
+'</table>';
document.write(code);

Собственно, как выцепить любой код ссылки href? Уже неделю пытаюсь, так и не выходит ничего путного... Прошу помочь, заранее огромное спасибо...
Записан
Serg79
Команда клуба

ru
Offline Offline
Пол: Мужской

WWW
« Ответ #1 : 29-05-2010 05:06 » 

xzfrqtn7, ты вообще сам понимаешь откуда у тебя этот кусок кода, что надо сделать и какое участие здесь должен принимать perl.

Из твоего вопроса мне кажется, что ты очень далек от поставленной цели.))
Записан
RXL
Технический
Администратор

ru
Offline Offline
Пол: Мужской

WWW
« Ответ #2 : 29-05-2010 11:10 » 

Код:
#!/usr/bin/perl -W

my $text = <<EOF;
var code='<style>'
+'#btbashtelrucontext {padding:0; font-size:14px; color:#fff; border:0;}'
+'#btbashtelrucontext td {width:20px; height:2px; border:0; }'
+'</style>'
+'<table id="btbashtelrucontext" cellspacing="0" cellpadding="0" border="0">'
+'      <tr><td>'
+'                      <a style="color:#fff;" href="http://bt.bashtel.ru/code/?tps=context&ids=1205&aid=12&s=uclaohh7urlmdjo6en23vr7eb6">Отдаешь свой голос паре №1</a><br />'
+'                      <a style="color:#fff;" href="http://bt.bashtel.ru/code/?tps=context&ids=1205&aid=11&s=uclaohh7urlmdjo6en23vr7eb6">Отдаешь свой голос паре №2</a><br />'
+'                      <a style="color:#fff;" href="http://bt.bashtel.ru/code/?tps=context&ids=1205&aid=10&s=uclaohh7urlmdjo6en23vr7eb6">Отдаешь свой голос паре №3</a><br />'
+'                      <a style="color:#fff;" href="http://bt.bashtel.ru/code/?tps=context&ids=1205&aid=11&s=uclaohh7urlmdjo6en23vr7eb6">Отдаешь свой голос паре №4</a><br />'
+'                      <a style="color:#fff;" href="http://bt.bashtel.ru/code/?tps=context&ids=1205&aid=11&s=uclaohh7urlmdjo6en23vr7eb6">Отдаешь свой голос паре №5</a><br />'
+'                      <a style="color:#fff;" href="http://bt.bashtel.ru/code/?tps=context&ids=1205&aid=10&s=uclaohh7urlmdjo6en23vr7eb6">Отдаешь свой голос паре №6</a><br />'
+'                      <a style="color:#fff;" href="http://bt.bashtel.ru/code/?tps=context&ids=1205&aid=10&s=uclaohh7urlmdjo6en23vr7eb6">Отдаешь свой голос паре №7</a><br />'
+'                      <a style="color:#fff;" href="http://bt.bashtel.ru/code/?tps=context&ids=1205&aid=11&s=uclaohh7urlmdjo6en23vr7eb6">Отдаешь свой голос паре №8</a><br />'
+'      </td></tr>'
+'</table>';
document.write(code);
EOF

my @refs = $text =~ m/<a\b[^>]*?\bhref="([^"]+)"[^>]*>/gi;

for my $ref (@refs)
{
    print "$ref\n"
}

xzfrqtn7,  изъясняй свои мысли яснее!
Записан

... мы преодолеваем эту трудность без синтеза распределенных прототипов. (с) Жуков М.С.
xzfrqtn7
Интересующийся

ru
Offline Offline

« Ответ #3 : 29-05-2010 19:22 » 

Прошу прощения, не дал мне Бог, к сожалению, красноречия знаменитых римских ораторов. Спасибо за код, не совсем то, но я понял, как разобраться... В догонку, хотел бы спросить про генерацию числа рандомно, на перле... Вот код
Код:
$random = int(rand(15)) + 10;

Код генерит рандомно чило от 15 (минимум) до 25 (максимум).... Можно ли сделать так, чтобы генерировать подобным образом число в таком, к примеру, формате : 109.15.147.40 ?
Записан
RXL
Технический
Администратор

ru
Offline Offline
Пол: Мужской

WWW
« Ответ #4 : 29-05-2010 22:33 » 

Функция rand(EXPR) генерит действительные числа в диапазоне [0, EXPR) - значение EXPR исключено! Т.е. твой пример даст целые числа от 10 до 24. Функция int не округляет, а отрезает дробную часть.

Можно ли сделать так, чтобы генерировать подобным образом число в таком, к примеру, формате : 109.15.147.40 ?

Это не число.
Записан

... мы преодолеваем эту трудность без синтеза распределенных прототипов. (с) Жуков М.С.
xzfrqtn7
Интересующийся

ru
Offline Offline

« Ответ #5 : 29-05-2010 22:47 » new

понятно. Улыбаюсь
Записан
Страниц: [1]   Вверх
  Печать  
 

Powered by SMF 1.1.21 | SMF © 2015, Simple Machines