regexp. Помогите составить выражение
помогите плиз текст между тегами span вытянуть
<td>Телефон:</td>
<td>
<span>(945) 132-5252 ТУТ ЕЩЕ ТЕКСТ МОЖЕТ БЫТЬ</span>
Мой нерабочий вариант:
$content =~ m!Телефон.*?</td><td><span>(.*?)</span>!;
<td>Телефон:</td>
<td>
<span>(945) 132-5252 ТУТ ЕЩЕ ТЕКСТ МОЖЕТ БЫТЬ</span>
Мой нерабочий вариант:
$content =~ m!Телефон.*?</td><td><span>(.*?)</span>!;
вот рабочий вариант:
между <td> надо поставить \s* ибо там тоже могут тусоваться символы :) типо перевода строки
Код:
$content =~ m!Телефон.*?</td>\s*<td>\s*<span>(.*?)</span>!s;
между <td> надо поставить \s* ибо там тоже могут тусоваться символы :) типо перевода строки
спасибо за ответ
дело действительно в переводе строки. Но этот пример у меня тоже не работает :( Пытался еще разные варианты. Пока что не получается...
странно
дело действительно в переводе строки. Но этот пример у меня тоже не работает :( Пытался еще разные варианты. Пока что не получается...
странно
Цитата: whitehood
вот рабочий вариант:
между <td> надо поставить \s* ибо там тоже могут тусоваться символы :) типо перевода строки
Код:
$content =~ m!Телефон.*?</td>\s*<td>\s*<span>(.*?)</span>!s;
между <td> надо поставить \s* ибо там тоже могут тусоваться символы :) типо перевода строки
Если хтмл код из примера написать в одну строку, то Вам шаблон работает :(
А вот если с переводом строки- то всё еще не то.. :(
А вот если с переводом строки- то всё еще не то.. :(
для таких проблем существует другая технология (могут возникнуть проблемы с кодировкой (каторые я еще почемуто не решил:) )):
Код:
$DOC=new DOMDocument("1.0", "windows-1251");
$DOC->loadHTML(file_get_contents("file.html"));
foreach($DOC->getElementsByTagName("span") as $Root){
print $Root->nodeValue."<br>\n";
}
$DOC->loadHTML(file_get_contents("file.html"));
foreach($DOC->getElementsByTagName("span") as $Root){
print $Root->nodeValue."<br>\n";
}
в данном случае быстрее и проще имхо использовать обычные регекспы (и не будет проблем с кодировкой ;))
в перле это можно сделать например так:
в перле это можно сделать например так:
Код:
my $html = <<HTML;
<td>Телефон:</td>
<td>
<span>(945) 32-5252 ТУТ ЕЩЕ<a> ТТ</a> МОЖЕТ БЫТЬ</span>
HTML
my $word;
if ($html =~ m!<span>(.*)(?=</span>)!s) { $word = $1 }
print $html, "\n", $word, "\n";
<td>Телефон:</td>
<td>
<span>(945) 32-5252 ТУТ ЕЩЕ<a> ТТ</a> МОЖЕТ БЫТЬ</span>
HTML
my $word;
if ($html =~ m!<span>(.*)(?=</span>)!s) { $word = $1 }
print $html, "\n", $word, "\n";
гениально... Особенно если учесть, что в html страницы тегов span может быть больше 200.
Как вытащить текст между двумя тегами я прекрасно знаю.
$content =~ m!Телефон.*?</td><td><span>(.*?)</span>!;
Обратите внимания пожалуйста на суть проблемы.
Поиск идет не между двумя тегами, а сразу на 4х строчках...
<td>Телефон2:</td>
<td>
<span>(945) 32-5252 ТУТ ЕЩЕ<a> ТТ</a> МОЖЕТ БЫТЬ</span>
<td>Телефон3:</td>
<td>
<span>(945) 32-5252 ТУТ ЕЩЕ<a> ТТ</a> МОЖЕТ БЫТЬ</span>
<td>Телефон4:</td>
<td>
<span>(945) 32-5252 ТУТ ЕЩЕ<a> ТТ</a> МОЖЕТ БЫТЬ</span>
<td>Телефон-Nое число-:</td>
<td>
<span>(945) 32-5252 ТУТ ЕЩЕ<a> ТТ</a> МОЖЕТ БЫТЬ</span>
Вот теперь попробуйте достать содержимое между тегами :)
Как вытащить текст между двумя тегами я прекрасно знаю.
$content =~ m!Телефон.*?</td><td><span>(.*?)</span>!;
Обратите внимания пожалуйста на суть проблемы.
Поиск идет не между двумя тегами, а сразу на 4х строчках...
<td>Телефон2:</td>
<td>
<span>(945) 32-5252 ТУТ ЕЩЕ<a> ТТ</a> МОЖЕТ БЫТЬ</span>
<td>Телефон3:</td>
<td>
<span>(945) 32-5252 ТУТ ЕЩЕ<a> ТТ</a> МОЖЕТ БЫТЬ</span>
<td>Телефон4:</td>
<td>
<span>(945) 32-5252 ТУТ ЕЩЕ<a> ТТ</a> МОЖЕТ БЫТЬ</span>
<td>Телефон-Nое число-:</td>
<td>
<span>(945) 32-5252 ТУТ ЕЩЕ<a> ТТ</a> МОЖЕТ БЫТЬ</span>
Вот теперь попробуйте достать содержимое между тегами :)
Если между тегами span есть только текст - можно сделать так:
если есть другие теги - пока не знаю как заставить его выбрать между двумя ближайшими span - выбирает по максимуму между первым <span> и последним </span> (( есть идеи? ;)
Код:
my $html = <<HTML;
<td>Телефон:</td>
<td><span>1 (945) 32-5252 ТУТ ЕЩЕ ТТ МОasdf234ЖЕТ БЫТЬ</span>
<td>Телефон3:</td>
<td>
<span>2 (945) 32-5252 ТУТ ЕЩЕ ТТasdf234 МОЖЕТ БЫТЬ</span>
<td>Телефон4:</td>
<td>
<span>3 (945) 32-5252 ТУТ ЕЩЕ ТТ МОЖЕТ БЫТЬ</span>
<td>Телефон-Nое число-:</td>
<td>
<span>4 (945) 32-5252 ТУТ ЕsdfЩЕ ТТ МОЖЕТ БЫТЬ</span>
HTML
my $word;
my @words = ($html =~ m!<span>([^\<]*)</span>!sg);
$,="\n";
print "\n", @words, "\n";
<td>Телефон:</td>
<td><span>1 (945) 32-5252 ТУТ ЕЩЕ ТТ МОasdf234ЖЕТ БЫТЬ</span>
<td>Телефон3:</td>
<td>
<span>2 (945) 32-5252 ТУТ ЕЩЕ ТТasdf234 МОЖЕТ БЫТЬ</span>
<td>Телефон4:</td>
<td>
<span>3 (945) 32-5252 ТУТ ЕЩЕ ТТ МОЖЕТ БЫТЬ</span>
<td>Телефон-Nое число-:</td>
<td>
<span>4 (945) 32-5252 ТУТ ЕsdfЩЕ ТТ МОЖЕТ БЫТЬ</span>
HTML
my $word;
my @words = ($html =~ m!<span>([^\<]*)</span>!sg);
$,="\n";
print "\n", @words, "\n";
если есть другие теги - пока не знаю как заставить его выбрать между двумя ближайшими span - выбирает по максимуму между первым <span> и последним </span> (( есть идеи? ;)
Квантификатор жадности:
Код:
if ($html =~ m!<span>(.*?)(?=</span>)!s) { $word = $1 }
print $html, "\n", $word, "\n";
print $html, "\n", $word, "\n";