home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 22 gnu / 22-gnu.zip / gnuawk.zip / awklib / eg / misc / findpat.sh < prev   
Text File  |  1997-03-15  |  224b  |  11 lines
  1. awk '{
  2.        if ($1 == "FIND")
  3.          regex = $2
  4.        else {
  5.          where = match($0, regex)
  6.          if (where != 0)
  7.            print "Match of", regex, "found at", \
  8.                      where, "in", $0
  9.        }
  10. }'
  11.