First your regex can be simplified to

s/(\.\W+)(\w)/$1\u$2/g;

[download]

you don't need the square brackets around \w and \W as they behave just like a normal letter with respect to the quantifiers (+,*,?,{}). Furthermore the /i modifier for case insensitive matching is not necessary as you don't use any cases in your search pattern.

To match newlines ('hard returns') it is easiest to slurp in the whole file and then match and replace the \n's explicitly, the (?<=) construct is a positive look behind assertion (see perlre):

open IN, "< infile" or die "couldn't open infile: $!";
undef $/;
$_ = <IN>;
s/(?<=\n\s*)(\w)/\u$1/g;
print OUT;

[download]

With a paragraph being defined as two newlines right after each other (allowing for whitespaces on the 'empty' line) this can be included in the regex as follows:

s/(?<=\n\s*\n\s*)(\w)/\u$1/g;

[download]

Update: after reading dimmesdale's answer (in the other thread with the same name) I used look behind assertions to simplify my regexes

-- Hofmator

In reply to Re: Capitalizing letters? by Hofmator
in thread Capitalizing letters? by KStowe

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.