SUMMARY: perl Syslog.pm problem on DU4.0A

From: Mike McGovern <Michael.McGovern_at_tcd.ie>
Date: Mon, 23 Dec 1996 11:45:32 +0000

My original problem was:

Undefined subroutine &Sys::Syslog::hostname called at Syslog.pm line 92.
perl, version 5.003 with EMBED

The solution (supplied by Robert L. McMillin - many thanks):

*** Syslog.pm Fri Aug 23 22:38:13 1996
--- Syslog.pm.new Fri Dec 20 13:54:04 1996
***************
*** 7,12 ****
--- 7,13 ----
  _at_EXPORT = qw(openlog closelog setlogmask syslog);
  
  use Socket;
+ use Sys::Hostname;
  
  # adapted from syslog.pl
  #
***************
*** 89,97 ****
  
  =cut
  
! require 'hostname.pl';
!
! $host = hostname() unless $host; # set $Syslog::host to change
  
  require 'syslog.ph';
  
--- 90,96 ----
  
  =cut
  
! $host = Sys::Hostname::hostname() unless $host; # set
$Syslog::host to change
  
  require 'syslog.ph';

--
I had to apply hunk2 of the patch manually for some reason, but it
worked fine.
 
Thanks also to Hellebo Knut and Ollivier Robert for responding.
  Mike McGovern
  =============

Received on Mon Dec 23 1996 - 13:00:21 NZDT