grep -i -E $1 sources/*.tcl > bin/search.tmp
grep -i -E $1 sources/*/*.tcl >> bin/search.tmp
grep -i -E $1 sources/*/*/*/*.tcl >> bin/search.tmp
shift

while test $1; do
	cp bin/search.tmp bin/search.tmpo

	export ca=`echo $1 | cut -c1-2`
	export cb=`echo $1 | cut -c3-`
	
	if test $ca = "--" ; then
		grep -i -v -E $cb bin/search.tmpo > bin/search.tmp
	else
		grep -i -E $1 bin/search.tmpo > bin/search.tmp
	fi

	shift
done

echo === found ==========================================================
cat bin/search.tmp
echo --- end ------------------------------------------------------------
