#!/usr/local/bin/perl -na

END {
	for $F (keys(%F)) { print ":\t", $F, "\t", $F{$F}, "\n" };
	exit
}
for $F (@F) { $F{$F}++ }

