William Taylor writes:
> Is there anyway to extend this in DNSEval.pm locally without patching? Maybe 
> with a plugin or something?
> 
>   my @originating = ();
>   for my $header ('X-Originating-IP', 'X-Apparently-From') {
>     my $str = $pms->get($header);
>     next unless $str;
>     push (@originating, ($str =~ m/($IP_ADDRESS)/g));
>   }
> 
> I want to add a few headers here but I didn't want to have to patch on each 
> upgrade.

hi William --

meant to reply to your private mail, but list mail is better ;) The best
bet to get it into the mainline is to add a configuration setting to
Conf.pm, specifying the names of additional headers to look up.

Failing that, why not add your additional headers using
"X-Originating-IP" in the first place? ;)

--j.

Reply via email to