home *** CD-ROM | disk | FTP | other *** search
/ Enter 1999 November / ENTER11_1.bin / OS2 / OS2CLU / BIN / find.cmd < prev    next >
Encoding:
Text File  |  1999-08-31  |  814 b   |  27 lines
  1. /*
  2.  *  ************************************************************************
  3.  *                          OS/2 Command-Line Utilities
  4.  *  (c) Copyright 1991-1999 Jonathan de Boyne Pollard.  All Rights Reserved.
  5.  *  ************************************************************************
  6.  */
  7.  
  8. /* "@(#)FIND.CMD version 1.01" */
  9.  
  10. '@echo off'
  11.  
  12. call RxFuncAdd 'SysGetMessage','RexxUtil','SysGetMessage'
  13.  
  14. usage = "Usage: FIND [/?] [/A[[+|-]drash]] [/SEBICQUV[+|-]] [/O[num[,num]]] Pattern [Filespecs ...]"
  15. copyr = "Copyright (c) 1999 Jonathan de Boyne Pollard.  All Rights Reserved."
  16.  
  17. parse arg line
  18.  
  19. select
  20.     when line == '/?' then
  21.         say SysGetMessage(52, "CLUH.MSG", copyr, usage)
  22.     when line \== '' then
  23.         address 'CMD' 'grep /r '||line
  24.     otherwise
  25.         say SysGetMessage(4, "CLU.MSG", usage)
  26. end
  27.