4.4BSD/usr/src/old/awk/test/t.a

	{if (amount[$2] "" == "") item[num++] = $2;
	 amount[$2] += $1
	}
END	{for (i=0; i<num; i++)
		print item[i], amount[item[i]]
	}