VPF::Добавление данных в xml - Форум программистов

fatherpatrice

Дата 23.3.2012, 14:40 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 14
Регистрация: 23.3.2012

Репутация: нет
Всего: нет

Проблема следующая:

Есть подобный xml файл:

<?xml version="1.0"?>
<CELL id="1">
<BOX1>abc</BOX1>
</CELL>

нужно дописать в файл значение, например "qwe" так:

<?xml version="1.0"?>
<CELL id="1">
<BOX1>abc</BOX1><BOX1>qwe</BOX1>
</CELL>

пришёл на связку perl+xml недавно, поэтому пока сильно путаюсь))
заранее спасибо)

Yakoot

Дата 23.3.2012, 14:49 (ссылка)

(голосов:1)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 12
Регистрация: 24.12.2011

Репутация: нет
Всего: нет

use XML::LibXML;
my $parser = XML::LibXML->new();
my $xml = $parser->parse_string("тут твоя xml-ка");
my @CELL = $xml->getElementsByTagName("CELL");
my $CELL = @CELL[0];
my $BOX1 = $xml->createElement("BOX1");
$BOX1->appendChild($xml->createTextNode("qwe"));
$CELL->appendChild($BOX1);

fatherpatrice

Дата 23.3.2012, 14:54 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 14
Регистрация: 23.3.2012

Репутация: нет
Всего: нет

Yakoot, премного благодарен)

fatherpatrice

Дата 26.3.2012, 13:10 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 14
Регистрация: 23.3.2012

Репутация: нет
Всего: нет

А как дописать значение не в конец файла а в определенную позицию?

например:
было:
<?xml version="1.0"?>
<LINK id="1">
   <BOX1>
                <e>a</e>
   </BOX1>
   <BOX2>
                 <e>b</e>
   </BOX2>
</LINK>

стало:
<?xml version="1.0"?>
<LINK id="1">
   <BOX1>
                  <e>a</e>
                  <e>c</e>
   </BOX1>
   <BOX2>
                  <e>b</e>
   </BOX2>
</LINK>

Это сообщение отредактировал(а) fatherpatrice - 27.3.2012, 09:27

Yakoot

Дата 27.3.2012, 14:29 (ссылка)

(голосов:1)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 12
Регистрация: 24.12.2011

Репутация: нет
Всего: нет

use XML::LibXML;
my $parser = XML::LibXML->new();
my $xml = $parser->parse_string("тут твоя xml-ка");
my @BOX1 = $xml->getElementsByTagName("BOX1");
my $BOX1 = @BOX1[0];
my $e = $xml->createElement("e");
$e->appendChild($xml->createTextNode("c"));
$BOX1->appendChild($e);

fatherpatrice

Дата 2.4.2012, 09:19 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 14
Регистрация: 23.3.2012

Репутация: нет
Всего: нет

Yakoot, что ты делаешь этой строкой?

my $BOX1 = @BOX1[0]; ..для чего 1ый эл-т массива выделять в переменную?

Это сообщение отредактировал(а) fatherpatrice - 2.4.2012, 09:21

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Perl: разработка для Web \| Следующая тема »