%hash = (dest => $dst, service => $service); 
    foreach my $key (keys %hash){
    my $val = $hash{$key};
    $count{$val}++;
    } #close foreach
} #close while