Marek Turczyniak wrote:
Hi

I try adding name virtual host from LDAP. here is code:

...
foreach $entry ($mesg->all_entries) {
        my %config;
        $config{ 'servername' } = $entry->get_value('servername');
        $config{ 'documentroot' } = $entry->get_value('documentroot');
        push @mytab,\%config;
}
$VirtualHost{'www.nethosting.pl'} = \@mytab;
...

I have some problem while apachectl configtest:

package Apache::ReadConfig;
#hashes:

%VirtualHost = (
  'www.nethosting.pl' => [
    {
      'servername' => '...',
      'documentroot' => '...'
    },
  ];
  ]
);

#arrays:

#scalars:

1;
__END__
Syntax OK
Insecure dependency in eval while running with -T switch.
Callback called exit.

What's wrong?
Something that has to do with the tainted variables in your code. You can test and probably reproduce it outside mod_perl with just adding the -T switch.

__________________________________________________________________
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