develooper Front page | perl.qpsmtpd | Postings from March 2006

Re: dnsbl or spamhaus occassionally blocks wrong IP

Thread Previous | Thread Next
From:
Matt Sergeant
Date:
March 15, 2006 06:33
Subject:
Re: dnsbl or spamhaus occassionally blocks wrong IP
Message ID:
F8EA5DE8-9308-47F4-8E66-CC710B586B6E@sergeant.org
On 14-Mar-06, at 5:50 PM, Peter J. Holzer wrote:

>> There is code in trunk to deal with this specific issue, around  
>> line 124
>> of ~/qpsmtpd, where the _fork subroutine is defined.
>
> You are right. But I don't understand it:
>
>     # cope with different versions of Net::DNS
>     eval {
>         $Net::DNS::Resolver::global{id} = 1;
>         $Net::DNS::Resolver::global{id} = int(rand 
> (Net::DNS::Resolver::MAX_ID()));
>         # print "Next DNS ID: $Net::DNS::Resolver::global{id}\n";
>     };
>     if ($@) {
>         # print "Next DNS ID: " . Net::DNS::Header::nextid() . "\n";
>     }
>
> which version of Net::DNS has a variable %Net::DNS::Resolver::global?
> Neither 0.48 nor 0.57 seem to have it. Is this for some old version  
> or a
> new one which hasn't been released yet?

Old version IIRC. The newer versions of Net::DNS didn't require any  
work on this as they fixed this bug.

> the ($@) branch doesn't do anything.

Yeah it was for debugging.

Matt.


Thread Previous | Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About