Select Code to Download

    push \%data, $data{name}, $data{address}, $data{phone}, $data{emai
+l};

my %field_name_mapping = (
    n_names => 'name',
...
        my $target = $field_name_mapping{ $source };
        $data{ $target } = $claim->{$source};
    };