-----------------------------------

ecliptical

Thu Dec 22, 2005 3:09 am


whois Report in Turing

-----------------------------------



procedure whois (url : string)

    %put "Results for ", url

    var netStream : int
    var net_line : char
    netStream := Net.OpenURLConnection ("http://www.checkdomain.com/cgi-bin/checkdomain.pl?domain=" + url)
    if netStream