4.4BSD/usr/src/contrib/gawk-2.15.2/test/poundbang

#! /tmp/gawk -f 
	{ ccount += length($0) }
END { printf "average line length is %2.4f\n", ccount/NR}