From 458bbfb114b1be21af95e5962e0e510148a1ac03 Mon Sep 17 00:00:00 2001
From: Alberto Massari <amassari@apache.org>
Date: Mon, 16 Oct 2006 07:41:52 +0000
Subject: [PATCH] Fixed regex to pick up the flags and compiler used to build
 Xerces

git-svn-id: https://svn.apache.org/repos/asf/xerces/c/trunk@464407 13f79535-47bb-0310-9956-ffa450edef68
---
 swig/perl/Makefile.PL | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/swig/perl/Makefile.PL b/swig/perl/Makefile.PL
index 602002edf..3810d0c6a 100644
--- a/swig/perl/Makefile.PL
+++ b/swig/perl/Makefile.PL
@@ -110,7 +110,7 @@ if (-f $XERCES_CONFIG) {
   my $sep;
   while (<CONF>) {
     if (/\@CXXFLAGS\@/) {
-      my ($sep, $flags) = /^s(.)\@CXXFLAGS\@\1([^\1]*)\1;/;
+      my ($sep, $flags) = /^s(.)\@CXXFLAGS\@\1\|[^\|]*\|([^\1]*)\1/;
       my @flags = split /\s+/, $flags;
       my @new_flags;
       foreach my $flag (@flags) {
@@ -127,11 +127,11 @@ if (-f $XERCES_CONFIG) {
       }
       ($CXXFLAGS) = join(' ',@new_flags);
     } elsif (/\@LDFLAGS\@/) {
-      ($sep, $LDFLAGS) = /^s(.)\@LDFLAGS\@\1([^\1]*)\1;/;
+      ($sep, $LDFLAGS) = /^s(.)\@LDFLAGS\@\1\|[^\|]*\|([^\1]*)\1/;
       @LDFLAGS = ('LDFLAGS'     => $LDFLAGS)
 	if $LDFLAGS !~ /^\s*$/;
     } elsif (/\@CXX\@/) {
-      ($sep, $CXX) = /^s(.)\@CXX\@\1([^\1]*)\1;/
+      ($sep, $CXX) = /^s(.)\@CXX\@\1\|[^\|]*\|([^\1]*)\1/
     }
   }
   print STDERR <<EOM;
-- 
GitLab