+ if ($line =~ /#\s*include\s+"perl\.h"/) {
+ push @{$patched_chunks{$file}}, 'PERL_IN_XSUB_RE';
+ return (
+ "#undef PERL_IN_XSUB_RE\n",
+ "#define PERL_IN_XSUB_RE 1\n",
+ $line,
+ "#undef PERL_IN_XSUB_RE\n",
+ );
+ } elsif ($line =~ /#\s*include\s+"INTERN\.h"/) {