RosettaCodeData/Task/String-case/PicoLisp/string-case.l

4 lines
67 B
Plaintext

(let Str "alphaBETA"
(prinl (uppc Str))
(prinl (lowc Str)) )