(1) I've patch the source slightly: --- Program.pm Sat Mar 29 14:32:24 2003 +++ /perl/site/lib/Apache/Authen/Program.pm Sat Mar 29 14:43:10 2003 @@ -11,5 +11,5 @@
use strict; -use Apache::Constants ':common'; +use Apache::Constants qw(SERVER_ERROR AUTH_REQUIRED OK); use File::Temp q(tempfile); (2) Some other time I'll use these new constants: http://perl.apache.org/docs/2.0/user/compat/compat.html#Deprecated_Con stants (3) startup.pl: use Apache2 (); use ModPerl::Util (); use Apache::RequestRec (); use Apache::RequestIO (); use Apache::RequestUtil (); use Apache::Server (); use Apache::ServerUtil (); use Apache::Connection (); use Apache::Log (); use Apache::Const -compile => ':common'; use APR::Const -compile => ':common'; use APR::Table (); use Apache::compat (); use ModPerl::Registry (); use CGI (); #use DBI (); #use DBD::mysql (); 1; (4) httpd.conf: <Directory "C:/Apache2/sweep"> AuthName "SWEEP Authentication" AuthType Basic PerlSerVar AuthenProgram "/usr/bin/perl /Apache2/authen/authen.pl" PerlSetVar AuthenProgramSuccess Ok PerlSetVar AuthenProgramPassword File PerlAuthenHandler Apache::Authen::Program require valid-user </Directory> (5) What happens is that Apache does not start. It stops within 1 second. There is nothing in error.log. (6) If I comment out 1 line in httpd.conf: # PerlSerVar AuthenProgram "/usr/bin/perl /Apache2/authen/authen.pl" Apache starts. (7) I've also tried: PerlSerVar AuthenProgram "/Apache2/authen/authen.bat" and PerlSerVar AuthenProgram /Apache2/authen/authen.bat in case quotes or a single token (no spaces) made any difference, but no. authen.bat is just: perl /Apache2/authen/authen.pl -- Cheers Ron Savage, [EMAIL PROTECTED] on 29/03/2003 http://savage.net.au/index.html
