Shell Programming and Scripting

#!/usr/bin/env bash

# @(#) s1	Demonstrate matching occurrences.
# See: http://sourceforge.net/projects/cgrep/

pe() { for _i;do printf "%s" "$_i";done; printf "\n"; }
pl() { pe;pe "-----" ;pe "$*"; }
db() { ( printf " db, ";for _i;do printf "%s" "$_i";done;printf "\n" ) >&2 ; }
db() { : ; }
C=$HOME/bin/context && [ -f $C ] && $C cgrep

FILE=${1-data1}
pl " Data file $FILE:"
head -10 $FILE

pl " Find all \"a\":"
cgrep a $FILE

pl " Omit first 2 \"a\":"
cgrep +N 2 a $FILE

pl " Omit first 2 \"a\", then match one:"
cgrep +N 2 -N 1 a $FILE

exit 0

% ./s1

Environment: LC_ALL = C, LANG = C
(Versions displayed with local utility "version")
OS, ker|rel, machine: Linux, 2.6.26-2-amd64, x86_64
Distribution        : Debian GNU/Linux 5.0.8 (lenny) 
bash GNU bash 3.2.39
cgrep ATT cgrep 8.15

-----
 Data file data1:
1	a
2	b
3	a
4	c
5	a
6	d
7	a
8	e

-----
 Find all "a":
1	a
3	a
5	a
7	a

-----
 Omit first 2 "a":
5	a
7	a

-----
 Omit first 2 "a", then match one:
5	a