X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=pod%2Fperlfaq4.pod;h=a5b505c4a7ab415d3cc9aac2d73b80c89e3c155a;hb=b4793f7f58b137d8b2f6d505d6c77dee2cd8cb25;hp=1bf3a96cd46400a6cf7a628ef964b41b85eff896;hpb=3e10809228cc961223b894e1639b44f8e2b64de0;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/pod/perlfaq4.pod b/pod/perlfaq4.pod
index 1bf3a96..a5b505c 100644
--- a/pod/perlfaq4.pod
+++ b/pod/perlfaq4.pod
@@ -325,9 +325,9 @@ To make the first letter of each word upper case:
 
         $line =~ s/\b(\w)/\U$1/g;
 
-This has the strange effect of turning "C<don't do it>" into
-"C<Don'T Do It>".  Sometimes you might want this, instead
-(Suggested by Brian Foy E<lt>comdog@computerdog.comE<gt>):
+This has the strange effect of turning "C<don't do it>" into "C<Don'T
+Do It>".  Sometimes you might want this, instead (Suggested by Brian
+Foy E<lt>comdog@computerdog.comE<gt>):
 
     $string =~ s/ (
                  (^\w)    #at the beginning of the line
@@ -371,7 +371,7 @@ suggests (assuming your string is contained in $text):
 
 If you want to represent quotation marks inside a
 quotation-mark-delimited field, escape them with backslashes (eg,
-C<"like \"this\"").  Unescaping them is a task addressed earlier in
+C<"like \"this\"">.  Unescaping them is a task addressed earlier in
 this section.
 
 Alternatively, the Text::ParseWords module (part of the standard perl