Select Code to Download

my $add_hashref = {
    map +('new_' . $_ => $add_in->{$_} // ''),
        grep $_ ne 'status', keys %$add_in
};
%$_ = (%$_, %$add_hashref) for @$data;