On 15 Jul 2003 at 2:58pm (-0600), Eric Sisler wrote:

> Ok, I'm tired of banging my head against this one.  I know there must be
> a simple perl, sed or tr solution, but I can't seem to find it.  I'm
> cleaning up some extracted data and the one annoying thing I have left
> is a single quote followed by a capital letter, which I want to change
> to lowercase like so:
> 
> Can'T -->  Can't
> Santa'S --> Santa's
> 
> and so on.
> 

How 'bout something like...

[EMAIL PROTECTED] matthewm]$ cat in
Can'T -->  Can't
Santa'S --> Santa's
[EMAIL PROTECTED] matthewm]$ cat in | perl -p -e "s/(\'[A-Z])/lc(\$1)/e"
Can't -->  Can't
Santa's --> Santa's
[EMAIL PROTECTED] matthewm]$ 

M.

-- 
WebCentral Pty Ltd           Australia's #1 Internet Web Hosting Company
Level 5, 100 Wickham St.           Network Operations - Systems Engineer
PO Box 930, Fortitude Valley.                     phone: +61 7 3249 2552
Queensland, Australia 4006.                       pgp key id: 0x900E515F


-- 
redhat-list mailing list
unsubscribe mailto:[EMAIL PROTECTED]
https://www.redhat.com/mailman/listinfo/redhat-list

Reply via email to