home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #18 / NN_1992_18.iso / spool / comp / lang / perl / 5317 < prev    next >
Encoding:
Text File  |  1992-08-14  |  1.2 KB  |  41 lines
  1. Newsgroups: comp.lang.perl
  2. Path: sparky!uunet!gatech!darwin.sura.net!uvaarpa!mmdf
  3. From: Studentbladet <stbl@otax.tky.hut.fi>
  4. Subject: Re: #! Emulation in MSDOS
  5. Message-ID: <1992Aug14.163641.29782@uvaarpa.Virginia.EDU>
  6. Sender: mmdf@uvaarpa.Virginia.EDU (Mail System)
  7. Reply-To: stbl@otax.tky.hut.fi
  8. Organization: The Internet
  9. Date: Fri, 14 Aug 1992 16:36:41 GMT
  10. Lines: 29
  11.  
  12. *** Quoting Mark C. DiVecchio (K3FWT) in Digest #497: 
  13.  > In a recent posting, I saw a reference to #! emulation in MSDOS.  The
  14.  > posting showed a code fragment which was to be place at the front of the
  15.  > file:
  16.  > @REM=(qq!
  17.  > @echo off
  18.  > perl %0.bat %1 %2 %3 %4 %5 %6 %7 %8 %9
  19.  > @goto end :) if 0;
  20. <rest omitted> 
  21.  
  22. As a general tip, using DOS without 4DOS seems like a braindead thing to
  23. do. This is an unsponsored plug. 
  24.  
  25. In 4dos, you just need declare 
  26.  
  27. SET .PL=c:\bin\perl.exe 
  28.  
  29. and wallah, all files with the .PL extension will be invoked via your
  30. Perl interpreter. You won't need the #! stuff (but it won't hurt if you
  31. have it). 
  32.  
  33. Go on, flame me. :-)
  34.  
  35. /* era */
  36.  
  37. --
  38. era is actually Robin "era" Eriksson, B}tsmansgatan 19 B 32, 00150 H:fors
  39. Finger stbl@otax.tky.hut.fi for info about deadlines, addresses & such 
  40. .ObDiscl: I rarely know what I'm doing  .ObQuote: <none>  .ObHack: (bool) 1
  41.