xref: /freebsd/contrib/one-true-awk/testdir/p.43 (revision b2d2a78ad80ec68d4a17f5aef97d21686cb1e29b)

BEGIN	{ FS = "\t" }
	{ area[$4] += $2 }
END	{ for (name in area)
		print name ":" area[name] }