在Perl中，可以使用merge函數來合并多維哈希。merge函數可以在兩個或更多哈希之間執行遞歸合并操作。下面是一個示例：
use Data::Merge qw(merge);
my %hash1 = (
'key1' => {
'subkey1' => 'value1',
'subkey2' => {
'subsubkey1' => 'value2',
},
},
);
my %hash2 = (
'key1' => {
'subkey2' => {
'subsubkey2' => 'value3',
},
'subkey3' => 'value4',
},
);
my %merged_hash = %{ merge(\%hash1, \%hash2) };
# 打印合并后的哈希
use Data::Dumper;
print Dumper(\%merged_hash);
上述代碼中，首先使用Data::Merge模塊導入merge函數。然后創建兩個多維哈希%hash1和%hash2。使用merge函數合并這兩個哈希，并將結果保存在%merged_hash中。最后使用Data::Dumper模塊的Dumper函數打印合并后的哈希。
運行上述代碼將得到如下輸出：
$VAR1 = {
'key1' => {
'subkey3' => 'value4',
'subkey2' => {
'subsubkey2' => 'value3',
'subsubkey1' => 'value2'
},
'subkey1' => 'value1'
}
};
可以看到，兩個多維哈希被成功合并成了一個新的多維哈希。
