home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #26 / NN_1992_26.iso / spool / comp / lang / perl / 6923 < prev    next >
Encoding:
Text File  |  1992-11-10  |  1.8 KB  |  51 lines
  1. Newsgroups: comp.lang.perl
  2. Path: sparky!uunet!mcsun!chsun!bernina!neptune!weingart
  3. From: weingart@inf.ethz.ch (Tobias Weingartner)
  4. Subject: Re: explanation of the camel book code needed
  5. Message-ID: <1992Nov10.151514.27625@neptune.inf.ethz.ch>
  6. Followup-To: comp.lang.perl
  7. Keywords: sh csh perl ksh running with shells
  8. Sender: news@neptune.inf.ethz.ch (Mr News)
  9. Nntp-Posting-Host: tau.inf.ethz.ch
  10. Reply-To: weingart@inf.ethz.ch
  11. Organization: ETH - Switzerland
  12. References: <1992Nov5.123219.16031@unilabs.uucp> <nrp.721043320@reading>
  13. Date: Tue, 10 Nov 1992 15:15:14 GMT
  14. Lines: 35
  15.  
  16. In article <nrp.721043320@reading>, nrp@csug3.cs.reading.ac.uk ("Scented fads" Neilski) writes:
  17. |> 
  18. |> I don't have the camel book (a serious shortcoming, I know) but I assume
  19. |> that you're referring to something like the output produced by a2p and s2p:
  20. |> 
  21. |> #!/gnu/bin/perl
  22. |> eval 'exec /gnu/bin/perl -S $0 ${1+"$@"}'
  23. |>     if $running_under_some_shell;
  24. |> 
  25. [stuff deleted]
  26.  
  27. How about?
  28.  
  29. #!/local/bin/perl
  30. eval 'exec /local/bin/perl -S $0 ${1+"$@"}'
  31.     if undef;
  32.  
  33. I have not tried this, but would it work?
  34.  
  35.  
  36. -- 
  37.  
  38. ***************************************************************
  39. * Tobias Weingartner  * Not every man is willing to die...    *                
  40. * c/o Bruno Opprecht  * Some have to be PUSHED out the window *
  41. * Oberdierikoner st.7 * ------------------------------------- *                
  42. * 6030 Ebikon Luzern  *      ...This space for rent...        *
  43. * SWITZERLAND         *      ...This space for rent...        *                
  44. ***************************************************************
  45. * +41'041'33'25'40    * ..Midnight the fading, blue Wizrd..   *
  46. ***************************************************************
  47. SYSTEM-F-ANARCHISM, the operating system has been overthrown                  
  48.  
  49. PGP2.0 Public Key available at 'finger weingart@tau.inf.ethz.ch'
  50.  
  51.