Select Code to Download

use strict;
use warnings;
...
my $output = merge($VAR1, $VAR2);

say Dumper $output;

$VAR1 = {
  'Adam' => {
...
    'ghi' => 0
  }
};