Re: Title Case One-Liner

There are also variations of one of this faq's answers which are a little shorter and also adjustable:

    perl -le '$_="ZENO WAS HERE";s/([^\s.,-]+)/\u\L$1/g;print'
    perl -le '$_="DANGER was hERe too";s/(\S+)/\u\L$1/g;print'
[download]

Comment on Re: Title Case One-Liner Download Code

Replies are listed 'Best First'.
Re: Re: Title Case One-Liner by japhy (Canon) on Feb 10, 2001 at 00:46 UTC
I suggest `s/([^\s\w]*)(\S+)/$1\u\L$2/g;` instead. It treats things like `q{"not a question" folks}` (which becomes `q{"Not A Question" Folks}`). `japhy` -- Perl and Regex Hacker	[reply] [d/l]
Re: Re: Re: Title Case One-Liner by chipmunk (Parson) on Feb 10, 2001 at 02:44 UTC
The trick there is making sure the first character is a word character. Here's a shorter version of the same thing: `s/(\w\S*)/\u\L$1/g;`	[reply] [d/l]
Re: Re: Re: Title Case One-Liner by MeowChow (Vicar) on Feb 10, 2001 at 03:38 UTC
Nice, but both this and chipmunk's can't handle `"just,another,list,of,words"` (ie. punctuation without spaces)... why not just: `s/(\w+)/\u\L$1/g;` [download] Update: eating self-served humble pie, never mind, this can't deal with `"i promise i won't shouldn't can't reply without thinking..."` :)	[reply] [d/l] [select]
Re: Re: Re: Re: Title Case One-Liner by japhy (Canon) on Feb 10, 2001 at 03:44 UTC
Because that doesn't handle `"what's up?"`, which it turns to `"What'S Up?"`. `japhy` -- Perl and Regex Hacker	[reply]