This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Try to avoid nesting F<$F<...>> in generated Config.pm
authorDavid Golden <dagolden@cpan.org>
Thu, 23 May 2013 23:11:23 +0000 (19:11 -0400)
committerDavid Golden <dagolden@cpan.org>
Fri, 24 May 2013 00:11:25 +0000 (20:11 -0400)
configpm

index cfcc467..efba74d 100755 (executable)
--- a/configpm
+++ b/configpm
@@ -1019,7 +1019,7 @@ EOF
   s{([\'\"])([^\'\"\s]+)\1}(C<$2>)g; # "date" command
   s{\'([A-Za-z_\- *=/]+)\'}(C<$1>)g; # 'ln -s'
   s{
-     (?<! [\w./<\'\"] )                # Only standalone file names
+     (?<! [\w./<\'\"\$] )              # Only standalone file names
      (?! e \. g \. )           # Not e.g.
      (?! \. \. \. )            # Not ...
      (?! \d )                  # Not 5.004