my %output;
$output{$_} ||= {( %{$VAR1->{$_}||{}}, %{$VAR2->{$_}||{}} )}
    for keys(%$VAR1), keys(%$VAR2);