my %field_name_mapping = (
    n_names => 'name',
    n_add   => 'address',
    n_phone => 'phone',
    n_email => 'email',
);

...
    for my $source (sort keys %field_name_mapping) {
        my $target = $field_name_mapping{ $source };
        $data{ $target } = $claim->{$source};
    };