[Mimedefang] contrib: relay_is_blacklisted_with_timeout

[David F. Skoll]

On Wed, 21 Jan 2004 Anthony.Caetano at t-systems.co.za wrote:

> I am new to this list, but couldn't find something like this in the
> archives.  Here is a contribution of a perl function which is rather
> clearly named.  Firstly, I Am Not A Perl Hacker, and this was
> painstakingly pieced together from tutorials and snippets and man pages.
> So this may suck and there may be better ways of doing this.  If so please
> let me know.

I'm leery of anything that requires signal handling, especially
SIGALRM.

I believe the Perl module Net::DNS has functions for doing timed-out DNS
lookups using select(), and I'd be happier with those.

Regards,

David.