home *** CD-ROM | disk | FTP | other *** search
/ ftp.cse.unsw.edu.au / 2014.06.ftp.cse.unsw.edu.au.tar / ftp.cse.unsw.edu.au / pub / doc / languages / perl / nutshell / ch5 / cshhack < prev    next >
Encoding:
Text File  |  1992-10-18  |  174 b   |  7 lines

  1. #!_P_E_R_L
  2.  
  3. # Catch for sh/csh on systems without #! ability
  4. eval '(exit $?0)' && eval 'exec _P_E_R_L -S $0 ${1+"$@"}'
  5. & eval 'exec _P_E_R_L -S $0 $argv:q'
  6. if 0;
  7.