This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Tighten the checking regex in checkcfgvar.pl.
authorNicholas Clark <nick@ccl4.org>
Fri, 16 Sep 2011 13:36:07 +0000 (15:36 +0200)
committerNicholas Clark <nick@ccl4.org>
Wed, 21 Sep 2011 08:40:57 +0000 (10:40 +0200)
Fix the dubious line in symbian/config.sh which this exposes.

Porting/checkcfgvar.pl
symbian/config.sh

index d288f3c..baefd4c 100755 (executable)
@@ -97,7 +97,7 @@ for my $cfg (sort @CFG) {
            next if /^\#/ || /^\s*$/ || /^\:/;
            # foo='bar'
            # foo=bar
-           if (/^(\w+)=('?)(?:.*)\2$/) {
+           if (/^(\w+)=(?:'.*'|[^'].*)$/) {
                ++$cfg{$1};
            } else {
                warn "$cfg:$.:$_";
index 0641b63..e218a55 100644 (file)
@@ -699,7 +699,7 @@ osname='symbian'
 osvers='7.0s'
 otherlibdirs=''
 package=''
-path_sep=';';
+path_sep=';'
 perl_static_inline='static'
 phostname='hostname'
 pidtype='int'