Rename keys with logic of renaming function.

renameKeysWith.js

import * as R from 'ramda';

/* オブジェクトのプロタティ名をすべてtransformerに従って変換して返す */
const renameKeysWith = R.curry((transformer, value) => {
  if (R.is(Array)(value)) {
    return R.map(renameKeysWith(transformer), value);
  }
  else if (R.is(Object)(value)) {
    // [['PropA', valueA], ['PropB', valueB], ...]
    const renamedPairs = R.map(
      R.evolve({ 0: transformer, 1: renameKeysWith(transformer) }),
      R.toPairs(value)
    );
    // { 'PropA': valueA, 'PropB': valueB, ... }
    return R.fromPairs(renamedPairs);
  }
  else {
    return value;
  }
});

/* PascalCaseからCamelCaseに変換する関数 */
const camelizeFromPascal = R.o(R.join(''), R.adjust(0, R.toLower));

/* オブジェクトのプロパティ名をPascalCaseからCamelCaseに変換する */
const sampleData = {
  ContentId: 123,
  CommentList: [ { Message: 'Hi' }, { Message: 'Yo' } ],
  PageSize: { Width: 100, Height: 200 }
};

renameKeysWith(camelizeFromPascal, sampleData);
// {"commentList": [{"message": "Hi"}, {"message": "Yo"}], "contentId": 123, "pageSize": {"height": 200, "width": 100}}