From owner-freebsd-commit  Tue Feb 13 08:40:40 1996
Return-Path: owner-commit
Received: (from root@localhost)
          by freefall.freebsd.org (8.7.3/8.7.3) id IAA21740
          for freebsd-commit-outgoing; Tue, 13 Feb 1996 08:40:40 -0800 (PST)
Received: (from root@localhost)
          by freefall.freebsd.org (8.7.3/8.7.3) id IAA21732
          for cvs-all-outgoing; Tue, 13 Feb 1996 08:40:38 -0800 (PST)
Received: (from root@localhost)
          by freefall.freebsd.org (8.7.3/8.7.3) id IAA21725
          for cvs-gnu-outgoing; Tue, 13 Feb 1996 08:40:36 -0800 (PST)
Received: from xanadu.umiacs.UMD.EDU (xanadu.umiacs.umd.edu [128.8.120.51])
          by freefall.freebsd.org (8.7.3/8.7.3) with ESMTP id IAA21704
          Tue, 13 Feb 1996 08:40:24 -0800 (PST)
Received: by xanadu.umiacs.UMD.EDU (8.7.3/UMIACS-0.9/04-05-88)
	id LAA19791; Tue, 13 Feb 1996 11:40:11 -0500 (EST)
Date: Tue, 13 Feb 1996 11:40:11 -0500 (EST)
From: Mike Grupenhoff <kashmir@umiacs.UMD.EDU>
To: Poul-Henning Kamp <phk@critter.tfs.com>
cc: "Jordan K. Hubbard" <jkh@time.cdrom.com>,
        Joerg Wunsch <joerg@freefall.freebsd.org>,
        CVS-committers@freefall.freebsd.org, cvs-gnu@freefall.freebsd.org
Subject: Re: cvs commit: src/gnu/usr.bin/perl/lib gethostname.pl Makefile 
In-Reply-To: <448.824219744@critter.tfs.com>
Message-ID: <Pine.SUN.3.91.960213113802.19238C-100000@xanadu.umiacs.umd.edu>
X-Phase-of-the-Moon: Waning Crescent (38% of Full)
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Sender: owner-commit@FreeBSD.ORG
Precedence: bulk


> > >   require "gethostname.pl";
> > >   $thishost = &gethostname'gethostname;

Perhaps you should just name the sub "main'gethostname", so calls would 
simply be

	require 'gethostname.pl';
	$thishost = &gethostname;

mike