home *** CD-ROM | disk | FTP | other *** search
/ Piper's Pit BBS/FTP: ibm 0210 - 0219 / ibm0210-0219 / ibm0213.tar / ibm0213 / HAM_W32.ZIP / SAMPLES / NEWFILES.CSH < prev    next >
Encoding:
Text File  |  1994-05-12  |  296 b   |  15 lines
  1. #    List all the files or directories in the current directory that
  2. #    do not occur in the specified directory.
  3.  
  4. #    Copyright (c) 1990 by Hamilton Laboratories.  All rights reserved.
  5.  
  6.  
  7. proc newfiles(olddir)
  8.     local i
  9.     foreach i (*)
  10.         if (! -e $olddir\$i) calc i
  11.     end
  12. end
  13.  
  14. newfiles $argv
  15.