Tengo un xml con la siguiente estructura:
Using xml Syntax Highlighting
<?xml version="1.0"?>
<list>
<urll>anonym_project_te_vagy_a_legjobb.mp3</urll>
<urll>fixing_my_brain.mp3</urll>
<urll>if_you_are_lost_for_somewhere_else_to_be_the_heavens.mp3</urll>
<urll>like_an_angel.mp3</urll>
<urll>making_me_nervous_brand_sucks.mp3</urll>
<urll>the_struggle.mp3</urll>
<urll>it_is_a_beautiful_day.mp3</urll>
</list>
<list>
<urll>anonym_project_te_vagy_a_legjobb.mp3</urll>
<urll>fixing_my_brain.mp3</urll>
<urll>if_you_are_lost_for_somewhere_else_to_be_the_heavens.mp3</urll>
<urll>like_an_angel.mp3</urll>
<urll>making_me_nervous_brand_sucks.mp3</urll>
<urll>the_struggle.mp3</urll>
<urll>it_is_a_beautiful_day.mp3</urll>
</list>
Coloreado en 0.001 segundos, usando GeSHi 1.0.8.4
y necesito agregarle otro nodo:
Using xml Syntax Highlighting
estoy haciendo lo siguiente:
Using perl Syntax Highlighting
my $xml = XMLin("$croot/prueba.xml",ForceArray => ['urll']);
foreach my $fileName (@{$Atachments->getFiles}) {
$fileUrl = $Atachments->getUrl($fileName);
$fileUrl= $self->session->url->getSiteURL . $fileUrl;
push @{ $xml->{urll}=> [$fileUrl]};
print XMLout($xml,RootName=>"list",NoAttr=>1,XMLDecl=>1);
}
foreach my $fileName (@{$Atachments->getFiles}) {
$fileUrl = $Atachments->getUrl($fileName);
$fileUrl= $self->session->url->getSiteURL . $fileUrl;
push @{ $xml->{urll}=> [$fileUrl]};
print XMLout($xml,RootName=>"list",NoAttr=>1,XMLDecl=>1);
}
Coloreado en 0.002 segundos, usando GeSHi 1.0.8.4
Pero no me funciona, ¿alguien me puede decir que estoy haciendo mal?
Gracias.
