home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / unix / volume12 / cake / part09 / Script / gred < prev    next >
Encoding:
Text File  |  1987-10-15  |  309 b   |  19 lines
  1. #! /bin/sh
  2. # gred - delete regular expression
  3. # usage: gred pattern file ...
  4.  
  5. case $# in
  6.     0|1) echo 1>&2 Usage: gred pattern file ...; exit 1;;
  7. esac
  8. TERMCAP=/etc/termcap; export TERMCAP
  9. pattern=$1
  10. shift
  11. for file in $*
  12. do
  13.     ex - $file << END ; : use ex so that \< \> can be used
  14.     g/${pattern}/d
  15.     w!
  16.     q
  17. END
  18. done
  19.