From owner-cvs-gnu  Tue Feb 13 05:17:53 1996
Return-Path: owner-cvs-gnu
Received: (from root@localhost)
          by freefall.freebsd.org (8.7.3/8.7.3) id FAA10695
          for cvs-gnu-outgoing; Tue, 13 Feb 1996 05:17:53 -0800 (PST)
Received: (from joerg@localhost)
          by freefall.freebsd.org (8.7.3/8.7.3) id FAA10685
          Tue, 13 Feb 1996 05:17:51 -0800 (PST)
Date: Tue, 13 Feb 1996 05:17:51 -0800 (PST)
From: Joerg Wunsch <joerg>
Message-Id: <199602131317.FAA10685@freefall.freebsd.org>
To: CVS-committers, cvs-gnu
Subject: cvs commit:  src/gnu/usr.bin/perl/lib gethostname.pl Makefile
Sender: owner-cvs-gnu@FreeBSD.ORG
Precedence: bulk

joerg       96/02/13 05:17:50

  Modified:    gnu/usr.bin/perl/lib  Makefile
  Added:       gnu/usr.bin/perl/lib  gethostname.pl
  Log:
  Add a small `gethostname' package.  It uses __sysctl(2), and thus
  avoids the kludgy backquotes that are required by now (`hostname`).
  
  Usage:
  
  require "gethostname.pl";
  $thishost = &gethostname'gethostname;
  
  Revision  Changes    Path
  1.8       +3 -3      src/gnu/usr.bin/perl/lib/Makefile