Adriano Ferreira wrote:
> On 2/26/07, jm <[EMAIL PROTECTED]> wrote:
>> is there a function, module, script, etc. that converts all uppercase to
>> proper mixed case.  this particular need is for an address list that
>> is all
>> uppercase
> 
> Doing it blindly, can be easily achieved with regexes:
> 
> $address =~ s/(\w)(\w*)/\u$1\L$2/g;

Or more simply:

$address =~ s/(\w+)/\u\L$1/g;



John
-- 
Perl isn't a toolbox, but a small machine shop where you can special-order
certain sorts of tools at low cost and in short order.       -- Larry Wall

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/


Reply via email to