Setting a perl variable in a VirtualHost via a section

[Mark Doyle]

Greetings,

I haven't been able to figure this one out from the available 
documentation
and guide. This mod_perl 1.2X...

Currently I have a bunch of virtual hosts with configs like:

<VirtualHost XXXXXXXXX:80>
  ServerName foo.aps.org
  PerlSetVar APSProduct "FOO"
  DocumentRoot /FOO
  ResourceConfig conf/homepage.conf
</VirtualHost>
which I want to replace with

<Perl>
foreach my $host (keys %ips) {
    my $HOST = uc $host;
    $VirtualHost{$ips{$host}} = {
        ServerName => $host . $domain,
        DocumentRoot => "/$HOST",
        ResourceConfig => 'conf/homepage.conf',
    }
}
</Perl>
How can I add the PerlSetVar APSProduct "FOO" to the <Perl> section? 
The value
of the variable depends on the virtual host of course.

Cheers,
Mark
--
Report problems: http://perl.apache.org/bugs/
Mail list info: http://perl.apache.org/maillist/modperl.html
List etiquette: http://perl.apache.org/maillist/email-etiquette.html