tolerate spaces when fixing up __cplusplus output by old h2xs

	Message-ID: <3619a1e8.12336659@smtp1.ibm.net>
	Subject: [PATCH 5.005_52]: xsubpp and PERL_OBJECT

p4raw-id: //depot/perl@1918

diff --git a/lib/ExtUtils/xsubpp b/lib/ExtUtils/xsubpp
index 5c45a85..1ee7b29 100755 (executable)
--- a/lib/ExtUtils/xsubpp
+++ b/lib/ExtUtils/xsubpp
@@ -776,7 +776,7 @@ while (<$FH>) {
        /^MODULE\s*=\s*([\w:]+)(?:\s+PACKAGE\s*=\s*([\w:]+))?(?:\s+PREFIX\s*=\s*(\S+))?\s*$/;
 
     if ($OBJ) {
-        s/#if(?:def|\s+defined)\s+(\(__cplusplus\)|__cplusplus)/#if defined(__cplusplus) && !defined(PERL_OBJECT)/;
+        s/#if(?:def\s|\s+defined)\s*(\(__cplusplus\)|__cplusplus)/#if defined(__cplusplus) && !defined(PERL_OBJECT)/;
     }
     print $_;
 }