home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / unix / volume12 / cake / part09 / Script / grei < prev    next >
Encoding:
Text File  |  1987-10-15  |  341 b   |  21 lines

  1. #! /bin/sh
  2. # grei - insert at regular expressions
  3. # usage: grei where what file ...
  4.  
  5. case $# in
  6.     0|1|2) echo 1>&2 Usage: grei where what file ...; exit 1;;
  7. esac
  8. TERMCAP=/etc/termcap; export TERMCAP
  9. where=$1
  10. what=$2
  11. shift; shift
  12. for file in $*
  13. do
  14.     ex - $file << END ; : use ex so that \< \> can be used
  15.     g/${where}/i\\
  16. ${what}
  17.     w
  18.     q
  19. END
  20. done
  21.