I'm trying to write a Perl DNS server that answers queries (A, NS, TXT, CNAME, LOC, MX, etc-- pretty much anything in http://en.wikipedia.org/wiki/List_of_DNS_record_types) based on the time of day, current weather in Paris, number of users on my server, the IP address of the requestor, a hash of the requested record, or pretty much anything I want.
In other words, I want to pay someone to create a framework that
populates variables and calls a subroutine when sending an answer to
the querying side. I'll worry about getting the weather in Paris,
computing the hash, etc.
If anyone's interested, please contact me off-list with a quote.
My failed attempt (for reference only) is attached. This was called
from xinetd as follows:
service local1 {
disable = no
socket_type = dgram
wait = yes
server = /path/to/my/script.pl
only_from = 127.0.0.1
}
where I added this to /etc/services:
local1 1024/tcp
local1 1024/udp
--
We're just a Bunch Of Regular Guys, a collective group that's trying
to understand and assimilate technology. We feel that resistance to
new ideas and technology is unwise and ultimately futile.
temp.pl
Description: Binary data
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/
