Не удалось добавить элемент xml в структуру, отформатированную в xml - PullRequest
1 голос
/ 09 февраля 2012

По какой-то причине, когда я добавляю элемент в XML-файл, он записывается в одну строку, т.е. не отформатирован

Исходный xml:

<configuration>
 <property>
 <name>test1</name>
</property>
</configuration>

my $parser =XML::LibXML->new();
my $doc    =$parser->parse_file($file) or die $!;
my $root   =$doc->getDocumentElement;
my $searchPath="/configuration";
my ($val)=$root->findnodes($searchPath);
my $propTag=$doc->createElement("property");
$val->appendChild($propTag);
my $nameTag=$doc->createElement("name");
$nameTag->appendTextNode($name);
$propTag->appendChild($nameTag);
$doc->setDocumentElement($root);
$doc->toFile($file,1);

В результате:

<configuration>
 <property>
    <name>test1</name>
 </property>
  <property><name>test2</name></property></configuration>

Вместо:

<configuration>
 <property>
    <name>test1</name>
 </property>
 <property>
   <name>test2</name>
  </property>
 </configuration>

1 Ответ

2 голосов
/ 09 февраля 2012

Вы можете запустить xmllint --format на выходе вашего Perl-скрипта.

...