¿Cómo agrego un nuevo par de valores clave a cualquier lugar que desee en el hash original manipulándolo a través de un archivo perl externo? - Perl

considera lo siguiente hash de hashes Dentro de un módulo de tarea perl como

package taskmoduleName;
use vars qw( %hash);
%hash = (
"x1" => {  "fruits" => {
"candiedfruit" => {
"sugarcoated" => {
"fruitname1" => "grapes",  }, },
"chocolatecoated" {
"fruitname2" => "cherries", }, },},
"vegetables" => {
"fried" => {
"salted" => {
"veg1" => "banana", }, }, },
"x2" => {    "xyz" =>
"xyz1 => "hhh", },}, );

Cómo puedo agregar un nuevo par de valores clave a cualquier lugar que quiera en el hash original por manipulándolo a través de un archivo perl externo?
PD No quiero modificar nada más en el archivo original excepto agregar las nuevas entradas

Respuestas

En su otro archivo puede hacer algo como esto:

use taskmoduleName;
$taskmoduleName{x1}{fruits}{long}{name} = "rhubarb";

Sin embargo, esto probablemente conduce a un código frágil y difícil de mantener, y no es realmente recomendable.

¿Por qué necesitas hacer algo como esto? Quizás alguien aquí pueda pensar en un enfoque diferente.