在 perl任务模块中考虑以下哈希散列
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', },}, );
如何通过外部perl文件操作原始哈希 添加新的键值对?
附:除了添加新条目
答案 0 :(得分:0)
在您的其他文件中,您可以执行以下操作:
use taskmoduleName;
$taskmoduleName{x1}{fruits}{long}{name} = 'rhubarb';
但是,这可能导致代码易碎且难以维护,并且不是真正推荐的。
为什么你需要做这样的事情?也许这里有人可以想到不同的方法。