$_= "
This is a paragraph

here too.";
s/(\n\w)/uc($1)/eg;
print;

##</code><code>##

$_= "
This is a paragraph

here too.";
s/(\n\w+)/uc($1)/eg;
print;