home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1993 #3 / NN_1993_3.iso / spool / comp / lang / perl / 7994 < prev    next >
Encoding:
Text File  |  1993-01-27  |  1.6 KB  |  54 lines
  1. Newsgroups: comp.lang.perl
  2. Path: sparky!uunet!ferkel.ucsb.edu!taco!gatech!udel!darwin.sura.net!spool.mu.edu!sol.ctr.columbia.edu!ira.uka.de!news.belwue.de!news.uni-ulm.de!huober_j
  3. From: huober_j@oracle.rz.uni-ulm.de (Joachim Huober)
  4. Subject: problems using System V IPC on a sparc-10
  5. Message-ID: <1993Jan26.154024.19857@wega.rz.uni-ulm.de>
  6. Sender: huober_j@oracle (Joachim Huober)
  7. Organization: Universitaet Ulm
  8. Date: Tue, 26 Jan 1993 15:40:24 GMT
  9. Lines: 43
  10.  
  11. Hi,
  12. I wrote the following small program to test, if the System V IPC work
  13. on my Sparc-10. It works fine on an Ultrix4-mashine
  14.  
  15. require "ipc.ph";
  16. require "msg.ph";
  17.  
  18. $KEY = 9876;
  19. $PERMS = 0666;
  20.  
  21. #MAIN
  22.         unless (defined($msgid = msgget($KEY+$i,$PERMS | &IPC_CREAT)))
  23.         {
  24.                 print STDERR "Can't create message queue\n\$! $!";
  25.         }
  26.         print STDOUT "msgid = $msgid\n";
  27.         msgsnd($msgid,pack("L a*",3,"Hallo dies ist ein Test"),0);
  28.         $var = ' ' x 256;
  29.         msgrcv($msgid,$var,256,3,0);
  30.         @var = unpa        @var = unpack("L a*",$var);
  31.         print STDOUT "var\[$var[0]\] = '$var[1]'\n";
  32.         unless (msgctl($msgid, &IPC_RMID, 0))
  33.         {
  34.                 print STDERR "Can't remove message queue\n\$! $!";
  35.         }
  36. #END
  37.  
  38. I've got the following errormessage
  39.  
  40. System V IPC is not implemented on this machine at ./xxxx line xx.
  41.  
  42. Now my Question:
  43. Which #defines do I have to make in the file config.h, so that
  44. perl compiles using the System V IPCs.
  45.  
  46. In the config.h file 
  47. #define HAS_MSGCTL              /**/
  48. #define HAS_MSGGET              /**/
  49. #define HAS_MSGRCV              /**/
  50. #define HAS_MSGSND              /**/
  51. are defined
  52.  
  53. I'm using a Sparc-10 with SunOS 4.1.3 
  54.