LINUX.ORG.RU

xml + perl + больная голова


0

0

Сижу дома, болею, скучаю. Вот решил поиграться с xml.
Есть xml файл вида:
 <asd>
   <a:b>1</a:b>
   <a:b>2</a:b>
   <a:b>3</a:b>
 </asd>

Требуется на perl перебрать все значения тегов <a:b>
(в идеале что бы вывела 1\n2\n3\n)

Может есть что-то или дайте вектор куда копать...
Сейчас желательно на русском, т.к. больной оргонизм его воспринимает и
то с трудом...
★★★★★
Ответ на: комментарий от larikin

А можно пример, а то я не совсем догоняю (простите человека, у него сейчас темпиратура 38...)

catap ★★★★★
() автор топика
Ответ на: комментарий от catap

XML::LibXML вообще-то получше будет ибо является частью серьёзного проекта.

пишу примерно: my $parser=new XML::LibXML(); my $output=$parser->parse_file("..."); foreach my $item ($output->getElementsByTagName("...")) { ... $item будет класса XML::LibXML::Node по моему... }

Также там есть XPATH-like findnodes, что даже лучше foreach my $item ($output->findnodes("/aaa/bbb/ccc[\@parm='fdf']/eee")) { }

vahvarh ★★★
()
Ответ на: комментарий от vahvarh

а как обратится к эллементу, в имене которого етсь ``:''?

catap ★★★★★
() автор топика

catap, ты лучше полежи почитай. Больной человек за компом дольше болеет.

Selecter ★★★★
()

Сегодня мне лучше. Немного подумав, решил что игра с xml это бяка... В общем все свелось к:

cat xml_file | grep `LC_ALL=C date +%a` | grep condition | awk -F\" {'print $6'}

;)

catap ★★★★★
() автор топика
Ответ на: комментарий от anonymous

ну почему же?.. По вашему быстрее парсировать xml?..

catap ★★★★★
() автор топика
Вы не можете добавлять комментарии в эту тему. Тема перемещена в архив.