Cambiar el contenido de un archivo XML a través del script Perl

Este hilo está en continuación deScript Perl para llenar un archivo XML.

El archivo que quiero cambiar es:

<?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>

Quiero agregar un nuevo país aquí en esta lista.

En la pregunta anterior,Script Perl para llenar un archivo XML.

#Get the list of cities as a list, then push "Tokyo" to it.
push @{$doc->{countries}->{country}->{'japan-'}->{city}}, 'Tokyo';

Esto se sugirió para agregar una nueva etiqueta, pero en mi caso no estoy seguro de cómo exactamente puedo usar "push". No puedo asignar a la etiqueta correcta.

Respuestas a la pregunta(2)

Su respuesta a la pregunta