Alterar um conteúdo de arquivo XML via script Perl
Este tópico está em continuação deScript Perl para preencher um arquivo XML.
O arquivo que eu quero alterar é:
<?xml version="1.0" encoding="UTF-8"?>
<configuration start="earth">
<country-list>
<country name="japan">
<description></description>
<start>1900</start>
<end/>
</country>
<country name="italy">
<description></description>
<start>1950</start>
<end/>
</country>
<country name="korea">
<description></description>
<start>1800</start>
<end/>
</country>
</country-list>
</configuration>
Quero adicionar um novo país aqui nesta lista.
Na pergunta anterior,Script Perl para preencher um arquivo XML.
#Get the list of cities as a list, then push "Tokyo" to it.
push @{$doc->{countries}->{country}->{'japan-'}->{city}}, 'Tokyo';
Isso foi sugerido para adicionar uma nova tag, mas, no meu caso, não tenho certeza de como exatamente posso usar "push". Não consigo mapear para a tag correta.