forum.opennet.ru - "Perl и XML" (1)

форумы

помощь

поиск

регистрация

майллист

ВХОД

слежка

"Perl и XML"

Форумы WEB технологии (Public)
Вариант для распечатки		Архивированная нить - только для чтения! Пред. тема \| След. тема
Изначальное сообщение		[Проследить за развитием треда]

"Perl и XML"
Сообщение от Silverwind on 01-Сен-03, 13:06 (MSK)
Помогите пожалуйста. Как мне из XML-ного файла вытащить нужные мне данные? Файл такой: - <NewDataSet> - <goods> <code>YQ19048</code> <name>YQ Hawaii Exclusive</name> <size>600x300x3mm</size> <volume>1.98</volume> <price1>510</price1> <price2>1009.8</price2> </goods> - <goods> <code>YQ77001</code> <name>YQ 77 Hawaii W/W "New"</name> <size>600x300x3mm</size> <volume>1.98</volume> <price1>483</price1> <price2>956.34</price2> </goods> </NewDataSet> Мне надо, чтобы при запросе скрипт вытаскивал мне все товары в массив. Как это сделать?
	Рекомендовать в FAQ \| Cообщить модератору \| Наверх

Оглавление

Индекс форумов | Темы | Пред. тема | След. тема

Сообщения по теме

1. "Perl и XML"

Сообщение от konst on 01-Сен-03, 13:45  (MSK)

open(F,"file.xml");
while(<F>) { s/[\r\n]+//; $text .= $_;}
@dataset = split('<NewDataSet',$text);
foreach $dataset  (@dataset) {
  @good = split('<goods',$dataset);
  foreach $good (@good) {
      while($good =~ s/<([^> ]+)[^>]*>([^<]*<\/\1>//) {
         print "$1 = $2\n";
      }
  }
}

Рекомендовать в FAQ | Cообщить модератору | Наверх

Удалить

Индекс форумов | Темы | Пред. тема | След. тема

Пожалуйста, прежде чем написать сообщение, ознакомьтесь с данными рекомендациями.

Партнёры:

Хостинг:

1. "Perl и XML"
Сообщение от konst on 01-Сен-03, 13:45 (MSK)
open(F,"file.xml"); while(<F>) { s/[\r\n]+//; $text .= $_;} @dataset = split('<NewDataSet',$text); foreach $dataset (@dataset) { @good = split('<goods',$dataset); foreach $good (@good) { while($good =~ s/<([^> ]+)[^>]>([^<]<\/\1>//) { print "$1 = $2\n"; } } }
	Рекомендовать в FAQ \| Cообщить модератору \| Наверх