Your DUMPER output indicates that %count does contain the information you expect.

The problem is how you are extracting it.

Both $c and $c1 are being set to the same value, in your code "$count{$key}".
Instead, try:

foreach my $key(%count){
  my $c = $key;
  my $c1 = $count{$key};
  print "$c = $c1\n"; 
  # Or more directly, print "$key = $count{$key}\n";
}
[download]