Help with Perl in httpd.conf

2000-12-31 Thread Scott Alexander

Hi,

I have the following in my httpd.conf file but the Limit is having no 
effect. Running perl -cx httpd.conf tells me I've got a syntax error on 
the limit line.

Any help ? 

I haven't included all the lines in the Perl section. 

It would be great if I got this to work before next year ;)

regards

Scott

Perl
#!perl

$Location {"/users/supervisor"} = {
  Limit = {"GET POST PUT DELETE "} = {
Require = 'supervisor',
  },
} ;
__END__
/Perl
_
scott alexander
tietoverkkosuunnittelija
humak amk - finland
+358(0)407505640



Help with Perl in httpd.conf

2000-12-31 Thread Scott Alexander

After searching the archives (I searched on Limit not on Perl 
like the  first time) I've changed my code to

But the limit does not work properly. I get a Directory index 
forbidden by rule: /usr/local/apache/htdocs/users/supervisor/
in the error log. 

Is the syntax still wrong or does anyone have any ideas about this?

Scott

Perl
#!perl

$Location {"/users/supervisor"} = {
  DAV = 'On',
  AllowOverride = 'None',
  Options = 'None',
  AuthName = '"Test"',
  AuthType = 'Basic',
  Auth_MySQL_Password_Table = 'users',
  Auth_MySQL_Username_Field = 'user',
  Auth_MySQL_Password_Field = 'passwd',
  Auth_MySQL_Encryption_Types = 'Plaintext',
  Auth_MYSQL = 'on',
  Limit = {
METHODS = `GET POST`,
require = `user supervisor`,
  },
} ;
__END__
/Perl
_
scott alexander
tietoverkkosuunnittelija
humak amk - finland
+358(0)407505640



Re: Help with Perl in httpd.conf

2000-12-31 Thread James G Smith

"Scott Alexander" [EMAIL PROTECTED] wrote:
Is the syntax still wrong or does anyone have any ideas about this?

I am thinking it is.  Try the following correction.

Perl
#!perl

$Location {"/users/supervisor"} = {
  DAV = 'On',
  AllowOverride = 'None',
  Options = 'None',
  AuthName = '"Test"',
  AuthType = 'Basic',
  Auth_MySQL_Password_Table = 'users',
  Auth_MySQL_Username_Field = 'user',
  Auth_MySQL_Password_Field = 'passwd',
  Auth_MySQL_Encryption_Types = 'Plaintext',
  Auth_MYSQL = 'on',
   Limit = {
 'GET POST' = {
   require = 'user supervisor',
 },
   },
} ;
__END__
/Perl

  Limit = {
METHODS = `GET POST`,
require = `user supervisor`,
  },

Also, you have backticks (`) in the above instead of single-
quotes (').  This will result in Perl trying to execute what is 
enclosed.  Probably not what you wanted.
+-
James Smith - [EMAIL PROTECTED] | http://www.jamesmith.com/
[EMAIL PROTECTED] | http://sourcegarden.org/
  [EMAIL PROTECTED]  | http://cis.tamu.edu/systems/opensystems/
+--