put file "~/Documents/addresses.csv" into source

repeat with each character of source
	if it is a controlChar then next repeat -- skip control characters
	if it is a lowercase then put "." after it -- make keys distinct
	add 1 to counts.(it)
end repeat

repeat with each (theChar, count) in counts
	put char 1 of theChar & " —> " & count
end repeat