On Mon, 12 Jan 2009, Jared Johnson wrote:
I propose something like the following in the connection packagesub remote_hostname{ my $self = shift;$self->{_remote_hostname} ||= Net::DNS::get_name($self->{_remote_ip})}This seems reasonable to me on principal.
Except doesn't work with -async. Well, it works, but blocks.
Was the name 'remote_hostname' as opposed to 'remote_host' intentional?
Probably to match apache/mod_perl - most of us qpsmtpd hackers are ex mod_perl guys.
Matt.