a pure-perl DNS resolver with support for timeout Kazuho Oku