Select Code to Download

if (!exists($data->{$key}) {
  $data->{$key} = [];
}
push @{$data->{$key}}, $new_value;