Преобразование части строки в верхний регистр в CMake

Есть ли удобный способ преобразовать строку в нижнем регистре, чтобы первый символ был в верхнем регистре?

В настоящее время у меня есть рабочее решение:

#PROTO_NAME is the lower-case string
string(SUBSTRING ${PROTO_NAME} 0 1 FIRST_LETTER)
string(TOUPPER ${FIRST_LETTER} FIRST_LETTER)
string(REGEX REPLACE "^.(.*)" "${FIRST_LETTER}\\1" PROTO_NAME_CAP "${PROTO_NAME}")

Результат находится в переменной PROTO_NAME_CAP. Есть ли более простой или удобный способ добиться этого?