Jenda Krynicky said:
> From: Gary Stainburn <[EMAIL PROTECTED]>
>> I've got to tidy some data, including converting case.  I need to
>> convert
>>
>> ANOTHER COMPANY NAME LTD      **
>>
>> to
>>
>> Another Company Name Ltd      **
>>
>> while retaining spaces.
>
> $text =~ s/(\w+)/\L\u$1/g;$y

\L\u  --  isn't perl clever?

-- 
Paul Johnson - [EMAIL PROTECTED]
http://www.pjcj.net


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to