home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #31 / NN_1992_31.iso / spool / comp / lang / perl / 7572 < prev    next >
Encoding:
Text File  |  1992-12-22  |  2.6 KB  |  79 lines
  1. Newsgroups: comp.lang.perl
  2. Path: sparky!uunet!haven.umd.edu!darwin.sura.net!zaphod.mps.ohio-state.edu!usc!news.cerf.net!netlabs!lwall
  3. From: lwall@netlabs.com (Larry Wall)
  4. Subject: Re: Details regarding the exec command
  5. Message-ID: <1992Dec21.202418.10520@netlabs.com>
  6. Sender: news@netlabs.com
  7. Nntp-Posting-Host: scalpel.netlabs.com
  8. Organization: NetLabs, Inc.
  9. References: <BzH641.L0J@cs.uiuc.edu>
  10. Date: Mon, 21 Dec 1992 20:24:18 GMT
  11. Lines: 66
  12.  
  13. In article <BzH641.L0J@cs.uiuc.edu> schwager@mike.cs.uiuc.edu (Mike Schwager) writes:
  14. : 
  15. : 
  16. : Everyone please open their Bibles to page 143... :-)
  17. : 
  18. : I'm trying to understand the "exec" call better.  I notice on the
  19. : aforementioned page that if I do
  20. : 
  21. : $shell = '/bin/csh';
  22. : exec $shell '-sh';
  23. : die "barf\n";
  24. : 
  25. : Then the shell believes it is a login shell- ie, $0 must be "-".  However,
  26. : if I do this:
  27. : 
  28. : exec '/bin/csh' '-sh';
  29. : 
  30. : it gives me an error, and if I do this:
  31. : 
  32. : exec $shell, '-sh';
  33. : 
  34. : it is not a login shell.  I don't understand The Book here, nor is it clear
  35. : what a "multi-valued list" is.  What exactly is exec'ed in the first
  36. : example?  Why does it work, whereas if I explicitly use the string
  37. : '/bin/csh' it fails?  Please enlighten me.
  38.  
  39. List operators have what has been called the filehandle slot, and that
  40. nowadays I tend to call the indirect object.  The distinguishing feature
  41. syntactically is that there is no comma separating that argument from
  42. the following argument.  This imposes some rather tight constraints
  43. on what can be put into that grammatical slot.  Only three things
  44. are allowed currently: a bare word, a simple scalar variable, or
  45. a block.
  46.  
  47. The print operators use this to specify a filehandle.  Certain other
  48. operators use this slot for other purposes.  For instance, the
  49. sort operator either looks for a subroutine name or an inlined
  50. block of code.  The exec routine looks for the name of the program
  51. to "really" execute.
  52.  
  53. I could conceivable allow a quoted string in the filehandle slot,
  54. but I'm afraid that it would lead rather quickly to unreadable code,
  55. since it's more difficult visually to find the end of a quoted string
  56. than the end of a bare word, a variable name, or a block.  In Perl 5
  57. you'll be able to say
  58.  
  59.     exec { "/bin/csh" } '-sh';
  60.  
  61. That's also supposed to work in 4.035, but it didn't seem to when I tried it.
  62.  
  63. The reason I call that the indirect object slot is by analogy between
  64.  
  65.     print STDOUT $foo;
  66.  
  67. and
  68.  
  69.     give DOG $bone;
  70.  
  71. And in fact, the latter would be equivalent in Perl 5 to
  72.  
  73.     DOG->give($bone);
  74.  
  75. [Note to Raphael:  yes, I agree about optimizing method lookup in the
  76. absence of redefinition--thanks for the suggestion.]
  77.  
  78. Larry
  79.