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.