Hash::Map->new->map_modify_identical(
                        qw(
                            vorname  firstname
                            name     lastname
                            zusatz1  name1
                            zusatz2  name2
                            strasse  street
                            ortsteil city_part
                            plz      zipcode
                            ort      city
                        ),
                        method ($source_key) {
                            return $tgscashrun->$source_key;
                        },
                    )->target_ref;