Здравствуйте!

Пробую решить следующею задачу.
Дан текст. Сделать заглавной первую букву первого слова каждого предложения. Предполагается, что первое слово предложения может как начинаться, так и не начинаться с заглавной буквы.
Решить нужно с помощью функционалов.
Вот как пытаюсь это сделать:

 

(defun chandge (list_)

(cons (concatenate (strcase (substr (car list_) 1 1))

(substr (car list_) 2 (1- (strlen (car list_))))) (cdr list_)

))

 

(chandge '(privet))

 

(apply 'chandge '((hello world.) (goodby world)))

 

Но мой интерпретатор ругается на функции strcase, substr, strlen, а их аналоги для common Lisp я найти не могу.