home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #20 / NN_1992_20.iso / spool / comp / lang / perl / 5789 < prev    next >
Encoding:
Internet Message Format  |  1992-09-09  |  2.2 KB
  1. Path: sparky!uunet!usc!rutgers!ub!dsinc!pitt.edu!djbpitt
  2. From: djbpitt+@pitt.edu (David J Birnbaum)
  3. Newsgroups: comp.lang.perl
  4. Subject: Re: aub problem finding sys/socket.ph
  5. Message-ID: <5638@blue.cis.pitt.edu.UUCP>
  6. Date: 9 Sep 92 12:56:29 GMT
  7. References: <1992Sep8.174434.17198@news.eng.convex.com> <5601@blue.cis.pitt.edu.UUCP> <1992Sep9.043504.7463@odin.corp.sgi.com>
  8. Sender: news+@pitt.edu
  9. Organization: University of Pittsburgh
  10. Lines: 58
  11.  
  12. In article <1992Sep9.043504.7463@odin.corp.sgi.com> stantz@sgi.com
  13. (Mark Stantz) writes:
  14.  
  15. >    Suppose we have a program:
  16. >
  17. >        #!/usr/local/bin/perl
  18. >
  19. >        foreach (@INC) {
  20. >          print "library $_\n";
  21. >        }
  22. >
  23. >        require <sys/socket.ph>;
  24. >        print &AF_INET . "\n";
  25. >
  26. >    On my system, this prints:
  27. >
  28. >        library /usr/local/lib/perl
  29. >        library .
  30. >        2
  31. >
  32. >    For the user, the output would be:
  33. >
  34. >        library <X>
  35. >        library <Y>
  36. >        Undefined subroutine "main'AF_INET" called at /tmp/aaa line 8.
  37.  
  38. The output I get from Mark's suggested routine is:
  39.  
  40. Can't locate sys/types.ph in @INC (did you run h2ph?) at 
  41.    /afs/pitt.edu/usr16/djbpitt/lib/perl/sys/socket.ph line 2, <_GEN_0> line 1.
  42. library /afs/pitt.edu/usr16/djbpitt/lib/perl
  43. library .
  44.  
  45. This is a different error from the one predicted; does it help? I do not
  46. have any sys/types.ph file; the only file in my .../perl/sys
  47. subdirectory is socket.ph. 
  48.  
  49. >    The user has generated sys/socket.ph and placed it in the directory
  50. ><X> or <Y>.  Running with '#!/usr/local/bin/perl -I <X>' doesn't help.  I
  51. >think it's a problem with the way perl was built at the site, not a problem
  52. >with perl itself.  Can't figure out what, through.
  53.  
  54. This experiment clearly rules out any problem with aub. I am sure that
  55. the problem lies with something I did with perl, rather than with perl
  56. itself, since the problem is apparently unique to me. (One reader sent
  57. me email that he had a problem finding sys/socket.ph when he was running
  58. aub under perl 3.0, but it went away when he switched to 4.0. I am using
  59. 4.035.)
  60.  
  61. Not a perl programmer, just a befuddled user,
  62.  
  63. David
  64.  
  65. -- 
  66. Professor David J. Birnbaum         djbpitt+@pitt.edu [Internet]
  67. The Royal York Apartments, #802     djbpitt@pittvms   [Bitnet]
  68. 3955 Bigelow Boulevard              voice: 1-412-687-4653
  69. Pittsburgh, PA  15123  USA          fax:   1-412-624-9714
  70.