FAQ tweak for Vanina Arca <varca@baufest.com>.

p4raw-id: //depot/perl@10568

diff --git a/pod/perlfaq6.pod b/pod/perlfaq6.pod
index 45f0966..121f66c 100644 (file)
--- a/pod/perlfaq6.pod
+++ b/pod/perlfaq6.pod
@@ -115,7 +115,7 @@ Here's code that finds everything between START and END in a paragraph:
 
     undef $/;                  # read in whole file, not just one line or paragraph
     while ( <> ) {
-       while ( /START(.*?)END/sm ) { # /s makes . cross line boundaries
+       while ( /START(.*?)END/sgm ) { # /s makes . cross line boundaries
            print "$1\n";
        }
     }