On Fri, 22 Mar 2002, Pete Kelly wrote:

> I am attempting to build mod_perl on NT.  I
> successfully built Apache.  I have ActiveState 5.6
> (Perl v5.6.1) installed.  I also have MS Visual Studio
> 6.0 installed.
> 
> I downloaded mod_perl-1.26.tar.gz from
> http://perl.apache.org/dist
> 
> After unzipping the files I get the get the following
> error:
> 
> C:\mod_perl-1.26>perl Makefile.PL
> Can't open perl script " -spi.bak ": No such file or
> directory
> C:\Perl\bin\perl.exe  -spi.bak   -e  "s/sub
> mod_perl::hooks.*/sub mod_perl::hook
> s { qw() }/" lib/mod_perl_hooks.pm failed
> 
> Any suggestions?

That's is very weird, because this code doesn't seem to work:

perl -e 'system("perl", " -e1") == 0 or die "oops"'

while this does:

perl -e 'system("perl", "-e1") == 0 or die "oops"'

notice the leading space before " -e1"

This patch should solve the problem.

Index: Makefile.PL
===================================================================
RCS file: /home/cvs/modperl/Makefile.PL,v
retrieving revision 1.196
diff -u -r1.196 Makefile.PL
--- Makefile.PL 9 Sep 2001 21:56:46 -0000       1.196
+++ Makefile.PL 22 Mar 2002 18:59:34 -0000
@@ -1101,7 +1101,7 @@
     cp "lib/mod_perl_hooks.pm.PL", "lib/mod_perl_hooks.pm"; 
 
     if ($Is_Win32) {
-      my @args = ($^X, ' -spi.bak ', ' -e ', "\"s/sub mod_perl::hooks.*/sub 
mod_perl::hooks { qw($hooks) }/\"", 'lib/mod_perl_hooks.pm');
+      my @args = ($^X, '-spi.bak ', ' -e ', "\"s/sub mod_perl::hooks.*/sub 
+mod_perl::hooks { qw($hooks) }/\"", 'lib/mod_perl_hooks.pm');
       system(@args) == 0 or die "@args failed\n";
     }
     iedit "lib/mod_perl_hooks.pm", 

__________________________________________________________________
Stas Bekman            JAm_pH ------> Just Another mod_perl Hacker
http://stason.org/     mod_perl Guide ---> http://perl.apache.org 
mailto:[EMAIL PROTECTED] http://use.perl.org http://apacheweek.com  
http://modperlbook.org http://apache.org   http://ticketmaster.com

Reply via email to