[REBOL] Re: Uppercase/Lowercase

From: john:schuhr at: 19-May-2001 9:22

Hi Rondon.. not sure if I understood your post
completely, but maybe you wanted something like
this?

capitalise: func ["Capitalizes all english words in specified string."
raw-string [string!]][
         new-str: make string! none
         foreach word-item (parse raw-string none) [
         new-str: rejoin [new-str (uppercase/part lowercase word-item 1) " "]
         ]
         return trim new-str
]

 >> str: "INFORMATION MANAGEMENT JOURNAL"
== "INFORMATION MANAGEMENT JOURNAL"
 >> capitalise str
== "Information Management Journal"

--John Schuhr

At 09:56 AM 5/19/2001 -0300, you wrote:

1 · 2 · [3] · 4 · See whole thread