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.
