From owner-freebsd-isp Thu Aug 2 8:47:21 2001 Delivered-To: freebsd-isp@freebsd.org Received: from fepC.post.tele.dk (fepC.post.tele.dk [195.41.46.147]) by hub.freebsd.org (Postfix) with ESMTP id C89CE37B406 for ; Thu, 2 Aug 2001 08:47:16 -0700 (PDT) (envelope-from leifn@neland.dk) Received: from arnold.neland.dk ([62.243.77.204]) by fepC.post.tele.dk (InterMail vM.4.01.03.21 201-229-121-121-20010307) with ESMTP id <20010802154715.QCAA3936.fepC.post.tele.dk@arnold.neland.dk> for ; Thu, 2 Aug 2001 17:47:15 +0200 Received: from localhost (localhost [127.0.0.1]) by arnold.neland.dk (8.11.4/8.11.4) with ESMTP id f72Fodo72576 for ; Thu, 2 Aug 2001 17:50:40 +0200 (CEST) (envelope-from leifn@neland.dk) Date: Thu, 2 Aug 2001 17:50:39 +0200 (CEST) From: Leif Neland To: Subject: script for dk-whois Message-ID: <20010802174509.N71435-100000@arnold.neland.dk> MIME-Version: 1.0 Content-Type: TEXT/PLAIN; charset=US-ASCII Sender: owner-freebsd-isp@FreeBSD.ORG Precedence: bulk List-ID: List-Archive: (Web Archive) List-Help: (List Instructions) List-Subscribe: List-Unsubscribe: X-Loop: FreeBSD.org dk-hostmaster has turned off access to whois-data by whois, and requires the use of a browser to http://www.dk-hostmaster.dk/dkwhois.shtml This script provides command-line access: #/bin/sh wget -q --referer=http://www.dk-hostmaster.dk/dkwhois.shtml \ --user-agent="opera 2.3" \ "http://www.dk-hostmaster.dk/perl/Whois.pl?query=$*" -O - | \ awk "/
/,/<\/pre>/ {lines++;print}
END {if (lines<5) {print \"Query produced no data\"}}" |grep -v "pre>"

 - - - - -

Could probably be done i perl, but in 5 lines?

Leif



To Unsubscribe: send mail to majordomo@FreeBSD.org
with "unsubscribe freebsd-isp" in the body of the message