Mailing List Archive: 49091 messages
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search
 

[REBOL] Re: refinement for whois protocol

From: chalz:earthlink at: 22-Apr-2002 4:06

I've got a script on my website for executing whois through my web browser. I'm sure it can be done more elegantly, but this was still early for me. And it works, so why mess with it? ;) Anyways, here's what the script says: ; service: "internic.net" service: "whois.geektools.com" print "Content-Type: text/plain^/" if not query: system/options/cgi/query-string [ print "Usage: whois?<id>" print "For instance, whois?chalz.net" ; print "Uses InterNIC. If you want to use" print "Uses whois.GeekTools.com. If you want to use" print " another service, use <id>@<service>." halt ] id: first query: parse query "@" if (length? query) = 2 [ service: second query ] print read rejoin [whois:// id "@" service]