#!/usr/local/bin/perl # # yourhost.pl # version 961110 # copyright 1996 by bo larsson # all rights reserved # # bugs or feedback to bliss@seagull.net # for information on how to use, visit http://www.seagull.net/bliss/ print "Content-type: text/plain\n\n"; print "$ENV{'REMOTE_HOST'}";