This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
perlretut: Add some white space for legibility
authorKarl Williamson <khw@cpan.org>
Wed, 11 Jan 2017 02:10:58 +0000 (19:10 -0700)
committerKarl Williamson <khw@cpan.org>
Fri, 13 Jan 2017 18:44:35 +0000 (11:44 -0700)
pod/perlretut.pod

index d74276c..d72d52d 100644 (file)
@@ -1479,7 +1479,7 @@ we can rewrite our 'extended' regexp in the more pleasing form
          |\.\d+     # mantissa of the form .b
          |\d+       # integer of the form a
       )
          |\.\d+     # mantissa of the form .b
          |\d+       # integer of the form a
       )
-      ([eE][+-]?\d+)?  # finally, optionally match an exponent
+      ( [eE] [+-]? \d+ )?  # finally, optionally match an exponent
    $/x;
 
 If whitespace is mostly irrelevant, how does one include space
    $/x;
 
 If whitespace is mostly irrelevant, how does one include space
@@ -1497,7 +1497,7 @@ this to our regexp as follows:
          |\.\d+     # mantissa of the form .b
          |\d+       # integer of the form a
       )
          |\.\d+     # mantissa of the form .b
          |\d+       # integer of the form a
       )
-      ([eE][+-]?\d+)?  # finally, optionally match an exponent
+      ( [eE] [+-]? \d+ )?  # finally, optionally match an exponent
    $/x;
 
 In this form, it is easier to see a way to simplify the
    $/x;
 
 In this form, it is easier to see a way to simplify the
@@ -1513,7 +1513,7 @@ could be factored out:
           )?        # ? takes care of integers of the form a
          |\.\d+     # mantissa of the form .b
       )
           )?        # ? takes care of integers of the form a
          |\.\d+     # mantissa of the form .b
       )
-      ([eE][+-]?\d+)?  # finally, optionally match an exponent
+      ( [eE] [+-]? \d+ )?  # finally, optionally match an exponent
    $/x;
 
 or written in the compact form,
    $/x;
 
 or written in the compact form,