2007/9/17, André Warnier <[EMAIL PROTECTED]>:

>
> If the above is not applicable, then you could use something like
> <location /xyz>
>    PerlSetVar AllowedIps "ip1 ip2 ip3"
>    ...
> </location>
>
> and in your module do
>
> sub handler {
>    my $r = shift; # the request object
>    my $AllowedIps = $r->dir_config('AllowedIps') || ''; # get "ip1 ip2 ip3"
>    ...
> }

Also you can add them in httpd.conf,

    PerlAddVar PassAuthIPs 11.11.11.11
    PerlAddVar PassAuthIPs 22.22.22.22
    PerlAddVar PassAuthIPs 33.33.33.33

and in modperl handler,

    @pass_ips = $r->dir_config->get('PassAuthIPs');

this would get the IPs you set with PassAuthIPs in httpd.conf.

Reply via email to