my ($k,$g,$a,$v,$f,$c) = split(/,/,$line);
push(@{$href->{$v}},$a);
sort(uniq(@{$href->{$v}}));