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